クラスメソッドの呼び出しを見てみよう。 2 use strict; 3 4 package Man; 5 sub new(){ 6 my @cals=caller(); 7 print "new:@cals:@_\n"; 8 } 9 sub walk(){ 10 my @cals=caller(); 11 print "new:@cals:@_\n"; 12 } 13 14 package main; 15 Man::walk(); 1…

:% !${CMD}

すぐ忘れちゃうんでメモ。 push @{ $hash{'key'} }, $hoge http://suzuki.tdiary.net/20041102.html#p02