my $reference_to_value;
if ($reference_to_value = exists $hash{$key}) {
    print "value is $$reference_to_value\n";
}