$filename = $ARGV[0];
open (FILE,"$filename") || die "Can't Open $filename: $!\n";

while<FILE>{ #dealing with it per-lines
  #process something here
}