Hello Natty,

> I meant the current subroutine name...

You could get the current subroutine name by using `caller` (see `perldoc -f 
caller`):

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


Regards,
Alan Haggai Alavi.
-- 
The difference makes the difference.
_______________________________________________
Perl mailing list
[email protected]
http://mail.perl.org.il/mailman/listinfo/perl

Reply via email to