[perl] 関数

実行するメソッドの存在をチェックする方法。

スポンサードリンク


# 呼ばれる関数のあるパッケージはcallerから得る。
my $pkg = caller;
my $func = $pkg->can("Do$name");

または


my $m = shift;
$self->error unless $self->can( $m );
$self->$m;

パッケージ名->can( メソッド名 );


__PACKAGE__->can( $m );

ClassName->can( $m );

canメソッドはUNIVERSALクラスが提供している。

参考文献