アプリ版:「スタンプのみでお礼する」機能のリリースについて

Perlで、自分自身の関数名を知る方法はあるでしょうか?

sub testfunc { print FUNCNAME }
&testfunc;

例えば、上記のようなコードを実行すると、testfunc という出力が得られるような FUNCNAME のような関数やモジュールがあるか、と言い換えてもいいかもしれません。

以上よろしくお願いします。

A 回答 (1件)

こんにちは


caller ではどうでしょうか
パッケージ名(たとえばmain::)がついちゃいますが

sub testfunc{print +(caller 0)[3]};
&testfunc;
    • good
    • 0
この回答へのお礼

なるほど、知りませんでした。ありがとうございました。

お礼日時:2007/07/17 21:17

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!