my %hash = ('$1' => 'oops',  'abc' => 'ok');  # create a hash

'abc' =~ m{ (abc) }xms;   # capture a sub-string to $1
print qq{captured '$1'};  # show what that string is

print $hash{'$1'};  # show effect of single-quotes: no interpolation