Name der Funktion ausgeben

[N.Bokov]

Hallo Leute,

wie kann man den Name der Funktion in Perl ausgeben? Ich verwende Perl 5.6.1

In C/C++ kann man doch define __FUNC__ oder __FUNCTION__ ausgeben und im Perl?

Danke!

[Cruz]

Hallo,

"der" Funktion? Es gibt nur eins?

Es ist bei mir schon ein paar Jährchen her, aber damals habe ich gerne das Carp Modul zum debuggen verwendet, um zu sehen, in welcher Funktion der Fehler genau aufgetreten ist.

http://search.cpan.org/~jprit/Devel-Carp-0.04/Carp.pm

Gruß,
Cruz

[Struppi]

wie kann man den Name der Funktion in Perl ausgeben? Ich verwende Perl 5.6.1

z.b. so:

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

Struppi.

[K.Bokov]

Hallo!

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

  
Genial! Besten Dank!  
  
ps: für Carp auch vielen Dank!