99_myUtils - get Name of current Sub ?

[Simon74]

Gibt es eine Perl Variable in der der aktuelle Name der aufgerufenen Sub Funktion steht ?

[crusader]

https://www.perlmonks.org/?node_id=283353

[Simon74]

jep, 

Code Auswählen Erweitern

###############################################################################
# Test
###############################################################################
sub subTest {
my $sub_name = (caller(0))[3];
$sub_name =~ s/.*:://;
Log 1, "$sub_name: Mal schauen obs funktioniert..";
}

[betateilchen]

wozu braucht man sowas?