一个Perl类是仅是一个包而已
一个模块就是一个包,一个包就是一个类
Perl中的继承只继承方法
记住保留“1;”为最后一行。这是Perl包的必需条件,否则该包就不会被Perl处理。
package Cocoa;
#
- Put “require” statements in for all required,imported packages
#
#
- Just add code here
#
1; # terminate the package with the required 1;
创建对象的方法有多种:
Cocoa::new()
Cocoa→new()
new Cocoa
注意:
1、一定要在构造函数中初始化变量;
2、一定要用my函数在方法中创建变量;
3、一定不要在方法中使用local,除非真的想把变量传递给其它子程序;
4、一定不要在类模块中使用全局变量。
对象知道自己属于哪个类,引用则不属于任何类。
require Exporter;ISA = qw (Exporter); Perl类的继承是通过
ISA数组实现的。它与@INC数组类似
如果一个方法在@ISA数组中未找到,Perl就到AUTOLOAD()子程序中寻找(必须用use Autoload),如果AUTOLOAD也失败了,Perl再到UNIVERSAL类做最后一次尝试,如果仍失败,Perl就生成关于该无法解析函数的错误。
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 [email protected] 举报,一经查实,本站将立刻删除。