I was AOL Instant Messengering a perl regex to extract the non-package -qualified subroutine name from caller()'s output:
and AOL turned the :( part of my regular expression into a frowning face.my ($ret) = ( (caller(1))[3] =~ /.*::(.*)$/ );
You woulda had to have been there to laugh as much as we did.
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Sometimes Perl looks like line noise and other times...
by bladx (Chaplain) on Aug 14, 2001 at 04:35 UTC |