in reply to conditional self-execution
It all seems to work:
./q.pl # prints scriptdo "q.pl"; # prints module
# q.pl if (__FILE__ eq $0) { print "script\n"; } else { print "module\n"; }
-- gam3
A picture is worth a thousand words, but takes 200K.
A picture is worth a thousand words, but takes 200K.
In Section
Seekers of Perl Wisdom