linxShaared links2022-06-22T12:37:54+00:00https://balik.network/linx/https://balik.network/linx/https://balik.network/linx/ShaarliDetermining Current Function Name (Perl Cookbook, 2nd Edition)https://balik.network/linx/?jxfD4Q2022-06-22T12:32:26+00:002022-06-22T12:37:54+00:00
my $caller_method_with_namespace = (caller(0))[3];
my ($method) = $caller_method_with_namespace =~ /([^::]*)$/;