Perl Object-Oriented inheritance usage

Student information has two packages consisting of date and student_info.

The date information includes the structure and settings of the time information.

The Student_info itself contains the settings for the name, referencing the structure and settings of the time information in the date packet.

---# #date.pm

650) this.width=650; "src=" Http://s3.51cto.com/wyfs02/M01/74/01/wKioL1YM95exNRBlAAEcmHcIOHg743.jpg "title=" 2015-10-01_170605.png "alt=" Wkiol1ym95exnrblaaecmhciohg743.jpg "/>

--student_info.pm

650) this.width=650; "src=" Http://s3.51cto.com/wyfs02/M00/74/03/wKiom1YM98fyIM4XAAGi0uH1-00138.jpg "title=" 2015-10-01_170703.png "alt=" Wkiom1ym98fyim4xaagi0uh1-00138.jpg "/>

---#验证程序

650) this.width=650; "src=" Http://s3.51cto.com/wyfs02/M00/74/01/wKioL1YM-IygJH3IAADXKQQQX_U244.jpg "title=" 2015-10-01_171011.png "alt=" Wkiol1ym-iygjh3iaadxkqqqx_u244.jpg "/>

--#验证结果展示

650) this.width=650; "src=" Http://s3.51cto.com/wyfs02/M01/74/03/wKiom1YM-KzS3rUCAADZSwHKa6k324.jpg "title=" 2015-10-01_171056.png "alt=" Wkiom1ym-kzs3rucaadzswhka6k324.jpg "/>

This article is from the "Strive for Excellence" blog, please be sure to keep this source http://tiger506.blog.51cto.com/318536/1699775

Perl Object-Oriented inheritance usage