open my $fh, '<', $name or die "The open failed because of '$!'\n";