2016/06/22

Caller in Perl

my $caller = (caller(1))[3];
damp $caller;

No comments:

Post a Comment