**Perl [#ofe8c982] #!/usr/bin/perl open(FH, "<" . $ARGV[0]) or die("open"); while( $line = <FH>) { print $line; } close(FH); $ perl test.pl aaa