> How do I get the name of the current PERL script I am 
> running?  The answer to this question may be very obvious but 
> I can't seem to locate it in my books or other resources.
> 
> Thanks in advance,
> 

# strip the path info to the script:
(my $prog = $0) =~ s/^.*[\\\/]//;

---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.786 / Virus Database: 532 - Release Date: 10/29/2004
 


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to