open my $file, '<', $_ or die "Could not open `$_': $!\n";