my $x = "(quantifier)";
my %x = ( "1" => "(hash_value)" );
my $z = 'quantifier hash_value';

print "_$1_\n" if $z =~ /$x{'1'}/;   # $x{'1'} is hash key

__END__

_hash_value_