perl物件導向

建立person.pm模組

package

person;
subnew
;    
#輸出使用者資訊
print
"名字：$self->\n";
print
"姓氏：$self->\n";
print
"編號：$self->\n";
bless
$self, $class; #
設定$self的型別為person
return
$self;}
subsetfirstname() = $firstname
ifdefined($firstname
);    
return
$self ->;
}sub
getfirstname();
}1;

2 呼叫模組

use

person;
$object = new person( "
小明", "
王", 23234345
);$object->setfirstname('
dashenbbb
','gg99999');
$firstname = $object ->getfirstname();
print
"firstname更改後值為： 
",$object->getfirstname(),"
\n";

3 方法繼承和重寫

package

employee;
useperson;
usestrict;
our@isa = qw(person);    #
從 person 繼承
# 重寫建構函式
subnew    = undef
;    
$self-> = undef
;    
bless
$self, $class
;    
return
$self;}
#重寫方法
subgetfirstname ;} 
#新增方法
subsetlastname = $lastname
ifdefined($lastname
);    
return
$self->;} 
subgetlastname ;} 
1;

Perl物件導向 類

最近工作當中要用perl寫一些指令碼，發現perl面象物件的程式設計比較生疏，所以重新學習一下，順便做個記錄。perl中的類就是乙個perl的包 package perl的類實際上就是乙個雜湊表的引用。perl使用關bless函式來生成類的引用。bless classsref classname 看...

perl物件導向的概念

1.物件只不過是引用 2.類就是包 3.方法就是子例程 perl 物件導向程式設計的三個基本定義 1.乙個 物件 是指乙個 有辦法知道它是屬於哪個類 的簡單簡單引用。物件就是引用變數 2.乙個 類 是指乙個 有辦法給屬於它的物件提供一些方法 的簡單包。類就是包 3.乙個 方法 是指乙個 接受乙個物件...

物件導向 初識物件導向

面向過程思想 步驟清晰簡單，第一步做什麼，第二步做什麼.面向過程適合處理一些較為簡單的問題 物件導向思想 物以類聚，分類的思維模式，思考問題首先會解決問題需要分哪些類，然後對這些類進行單獨思考，最後才是對某個分類下的細節進行面向過程的思索 物件導向適合處理複雜的問題，適合處理需要多人協作的問題 對於...