=>perl -le'open I, "<", $ARGV[0] or die "$!"; print while <I>;print "done"' 
done

=>perl -le'open I, "<$ARGV[0]" or die "$!"; print while <I>;print "done"'   
A file or directory in the path name does not exist. at -e line 1.

=> perl -v
 
This is perl, v5.8.0 built for aix-thread-multi