open my $fh, "<", $file or die "failed to open $file $!";