in reply to Special variable to return current sub name?

Check caller(). Something like: 
$iam = (caller 0)[3];

[download]

Liz

In Section Seekers of Perl Wisdom