$hash{"$regexp"} = $value;

...
$value  = $hash{$key};
$regexp = qx/$key/;  # Expensive