open my $fh, "<", $file_name or die "can't open file: $!"; while(<$fh>){ chomp; ... } ...