open( INFILE, "<$ARGV[0]" ) 
    or die "Culd not open $ARGV[0] $!";
 ....
close INFILE;