Comment savoir dans quel sous-programme je suis?

Question

Existe-t-il un moyen d'obtenir le nom de la sous-routine englobante d'un morceau de code perl? Par exemple:

sub foo { print where_am_i(); } 

volonté sortie 'foo'.

Answer 1

Utilisez la fonction caller:

my $function = (caller(0))[3];