Have you looked at the output from qr/.../? It's a lot different than the output from single quotes.

Try the following code, and you'll see what I mean:

my %hash = (
    qr/test/, 0,
    'test'  , 0,
);

print "$_\n" foreach keys %hash;
[download]