Perl 面向对象 继承的用法

学生信息有两个包组成 Date和Student_info。

其中Date信息包括了时间信息的结构与设置。

Student_info自身包含了名字的设置，引用Date包中时间信息的结构与设置。

---##Date.pm

<a href="http://s3.51cto.com/wyfs02/M01/74/01/wKioL1YM95exNRBlAAEcmHcIOHg743.jpg" target="_blank"></a>

--Student_info.pm

<a href="http://s3.51cto.com/wyfs02/M00/74/03/wKiom1YM98fyIM4XAAGi0uH1-00138.jpg" target="_blank"></a>

---#验证程序

<a href="http://s3.51cto.com/wyfs02/M00/74/01/wKioL1YM-IygJH3IAADXKQQQX_U244.jpg" target="_blank"></a>

--#验证结果展示

<a href="http://s3.51cto.com/wyfs02/M01/74/03/wKiom1YM-KzS3rUCAADZSwHKa6k324.jpg" target="_blank"></a>

本文转自 tiger506 51CTO博客，原文链接：http://blog.51cto.com/tiger506/1699775，如需转载请自行联系原作者