#this wil cover strings and input from user

#!/usr/bin/perl
use strict;


my %hash;

my $name;
my $value;


$name = <STDIN>;
chomp($name);
$value = <STDIN>;
chomp($value);


$hash{$name} = $value;

print $hash{$name};

#thats it