if (my $ans = $hash{$input}) { print "$input => $ans\n"; #### if (exists $hash{$input}) { print $hash{$input}, "\n";