I opened a file to read from line by line:
open(FH,\"<\",\"$myfile\") or die \"could not open $myfile: $!\"; while () { # ...do something }
You have a few options.