Hallo,
evtl hilft dir caller.
zum ausprobieren:
use Data::Dumper;
sub bla{
print Dumper(\caller);
}
Dokumentation: perldoc -f caller
gruss
--
no strict;
no warnings;
79.78 cups of Coffee (Brewed) + Me = Death
Reklame ist die Kunst, auf den Kopf zu zielen und die Brieftasche zu treffen.
no strict;
no warnings;
79.78 cups of Coffee (Brewed) + Me = Death
Reklame ist die Kunst, auf den Kopf zu zielen und die Brieftasche zu treffen.