open FILE, $filename or die "cant open: $!"; while() { chomp; print "read line: $_ \n"; } close FILE;