Perl面向?qū)ο缶幊讨蟹椒ǖ恼{(diào)用
本文和大家重點討論一下Perl面向?qū)ο缶幊痰母拍睿琍erl的方法定義不提供任何特殊語法,但規(guī)定方法的第一個參數(shù)為對象或其被引用的包。Perl有兩種方法:靜態(tài)方法和虛方法。下面請看詳細介紹。
Perl面向?qū)ο缶幊?方法的調(diào)用
1、方法
Perl類的方法只不過是一個Perl子程序而已,也即通常所說的成員函數(shù)。Perl的方法定義不提供任何特殊語法,但規(guī)定方法的第一個參數(shù)為對象或其被引用的包。Perl有兩種方法:靜態(tài)方法和虛方法。
Perl面向?qū)ο缶幊讨徐o態(tài)方法第一個參數(shù)為類名,虛方法第一個參數(shù)為對象的引用。方法處理第一個參數(shù)的方式?jīng)Q定了它是靜態(tài)的還是虛的。靜態(tài)方法一般忽略掉第一個參數(shù),因為它們已經(jīng)知道自己在哪個類了,構(gòu)造函數(shù)即靜態(tài)方法。虛方法通常首先把第一個參數(shù)shift到變量self或this中,然后將該值作普通的引用使用。如:
1.subnameLister{
2.my$this=shift;
3.my($keys,$value);
4.while(($key,$value)=each(%$this)){
5.print"\t$keyis$value.\n";
6.}
7.}
2、方法的輸出
Perl面向?qū)ο缶幊讨腥绻悻F(xiàn)在想引用Cocoa.pm包,將會得到編譯錯誤說未找到方法,這是因為Cocoa.pm的方法還沒有輸出。輸出方法需要Exporter模塊,在包的開始部分加上下列兩行:
requireExporter;
@ISA=qw(Exporter);
這兩行包含上Exporter.pm模塊,并把Exporter類名加入@ISA數(shù)組以供查找。接下來把你自己的類方法列在@EXPORT數(shù)組中就可以了。例如想輸出方法closeMain和declareMain,語句如下:
@EXPORT=qw(declareMain,closeMain);
Perl類的繼承是通過@ISA數(shù)組實現(xiàn)的。@ISA數(shù)組不需要在任何包中定義,然而,一旦它被定義,Perl就把它看作目錄名的特殊數(shù)組。它與@INC數(shù)組類似,@INC是包含文件的尋找路徑。@ISA數(shù)組含有類(包)名,當一個方法在當前包中未找到時就到@ISA中的包去尋找。@ISA中還含有當前類繼承的基類名。
類中調(diào)用的所有方法必須屬于同一個類或@ISA數(shù)組定義的基類。如果一個方法在@ISA數(shù)組中未找到,Perl就到AUTOLOAD()子程序中尋找,這個可選的子程序在當前包中用sub定義。若使用AUTOLOAD子程序,必須用useAutoload;語句調(diào)用autoload.pm包。AUTOLOAD子程序嘗試從已安裝的Perl庫中裝載調(diào)用的方法。如果AUTOLOAD也失敗了,Perl再到UNIVERSAL類做最后一次嘗試,如果仍失敗,Perl就生成關于該無法解析函數(shù)的錯誤。
3、方法的調(diào)用
Perl面向?qū)ο缶幊讨姓{(diào)用一個對象的方法有兩種方法,一是通過該象的引用(虛方法),一是直接使用類名(靜態(tài)方法)。
【編輯推薦】