Wagner, David --- Senior Programmer Analyst --- WGO wrote:
ktb wrote:
But while you are running the script $0 will always be true. Also from my testing the name in $0 shows the full pathname while what comes out of File::Find is in reference to where you started the processing. So you might need to do something like this: # # Start of the program # my $MyScript = $0; $MyScript =~ s/.+\//; if ( (-f) && ( ! /$MyScript/ ) )
Not sure in which version it was introduced, but try: perldoc FindBin http://danconia.org -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]