#!/opt/third/party/bin/perl -w
print "Start of testARGV.pl\n";
if ($#ARGV != 0)
{
   foreach( @ARGV )
   {
      print $_;
   }
}

##</code><code>##

Start of testARGV.pl
 
./testARGV.pl:3: command not found: 0
./testARGV.pl:5: unknown file attribute