クラスの継承には@ISAを使う。
クラスを継承する - Perlプログラミング入門ゼミ - Perlでテキスト処理・Linuxサーバー管理・Webシステム開発
BaseClassにbase_methodを用意しておく。
DerivedClassにderived_methodを用意しておく。
useでBaseClassを読み込み、@ISAにBaseClassを追加しておく。
これでDerivedClassからもBaseClassのメソッドbase_methodが使える。
これでbase_methodを呼び出せるか。
[bg1@dti-vps-srv93 ISA]$ vi BaseClass.pm [bg1@dti-vps-srv93 ISA]$ vi DerivedClass.pm [bg1@dti-vps-srv93 ISA]$ vi main.pl [bg1@dti-vps-srv93 ISA]$ perl main.pl derived_method base_method [bg1@dti-vps-srv93 ISA]$
呼び出せた。
Sample/perl/ISA/ISA/src/ISA at master · bg1bgst333/Sample · GitHub