my %Rx = ( test => qr// );
print $Rx{test}, $/;