open(FILE, "<", $filename) or die "Unable to open file:$filename <$!>"; while() { print "$_" } close(FILE);