Here's one approach:

Data file 1 file_1.dat: 

name1 ABCD
name2 BCD
name3 ASCDA
name4 AAAAA

[download]

Data file 2 file_2.dat: 

name1 0.2
name5 0.3
name4 0.0002
name7 0.222

[download]

Script check_hash_vs_keys_1.pl: 

use warnings;
use strict;

use Data::Dumper;


# validate script arguments.
die "usage: perl $0 data_file_1 data_file_2 \n" unless @ARGV >= 2;

# capture data file names.
my $file_1_name = $ARGV[0];
my $file_2_name = $ARGV[1];

# open 1st data file, read to 1st hash.
open (my $fh_data_1, '<', $file_1_name)
    or die "opening '$file_1_name': $!";
my %hash_1 = split ' ', do { local $/;  <$fh_data_1>; };
close $fh_data_1 or die "closing '$file_1_name': $!";
# print Dumper \%hash_1;  # FOR DEBUG -- sanity check

# open 2nd data file, process line-by-line.
open (my $fh_data_2, '<', $file_2_name)
    or die "opening '$file_2_name': $!";

while (my $line = <$fh_data_2>) {
    my ($k) = split ' ', $line;
    # print "split key '$k' \n";  # FOR DEBUG
    print "'$k' -> '$hash_1{$k}' \n" 
        if defined($k) and exists $hash_1{$k};
    }

close $fh_data_2 or die "closing '$file_2_name': $!";

[download]

Output: 

c:\@Work\Perl\monks\gghelpneeded>perl check_hash_vs_keys_1.pl file_1.d
+at file_2.dat
'name1' -> 'ABCD'
'name4' -> 'AAAAA'

[download]

Give a man a fish:  <%-(-(-(-<

In reply to Re^5: Retrieving Key and Value Hashes by AnomalousMonk
in thread Retrieving Key and Value Hashes by gghelpneeded

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.