On Wednesday 30 May 2001 16:45, Craig Moynes/Markham/IBM wrote:
> # If the first argument is a text file then  store the name
> if ( (-T $ARGV[0]) )
> # ^ This is the bad boy

Replace it with

        if (defined($ARGV[0]) && (-T $ARGV[0]))

or possibly

        if (@ARGV && (-T $ARGV[0]))

whatever seems more intuitive (second form uses @ARGV in scalar context, thus 
converting it to number of elements).

-- 
Ondrej Par
Internet Securities
Software Engineer
e-mail: [EMAIL PROTECTED]
Phone: +420 2 222 543 45 ext. 112

Reply via email to