クラスのメソッドの書き方には、いくつかある。
perlobj - Perl のオブジェクト - perldoc.jp
method1に渡される引数を2番目まで出力。
アロー演算子を使った今までの方法のほかに、メソッド名の後ろにオブジェクト名、そしてメソッド名の後ろにクラス名という方法がある。
3つ目は、クラスメソッドだが。
[bg1@dti-vps-srv93 class]$ vi CustomClass.pm [bg1@dti-vps-srv93 class]$ vi class.pl [bg1@dti-vps-srv93 class]$ perl class.pl method1 $arg1 = CustomClass=HASH(0xc76a68) $arg2 = ABC method1 $arg1 = CustomClass=HASH(0xc76a68) $arg2 = ABC method1 $arg1 = CustomClass $arg2 = ABC [bg1@dti-vps-srv93 class]$
1つ目、2つ目、ともに1番目の引数にオブジェクト自身、2番目の引数に指定した引数"ABC"が来る。
3つ目は、クラスメソッドなので、オブジェクトじゃなくてクラス名が渡されてくる。
Sample/perl/class/method/src/class at master · bg1bgst333/Sample · GitHub