How do I do literal quotes in a regex?

[ToddAndMargo via perl6-users]

Hi All,

Is there a `Q[]` that can be used in a regex?

I am looking for how to get around

my $x = Q[\:\\::]; ( my $y = $x ) ~~ s/ '\\\\' /x/; say $y
\:x::

This does not work:
my $x = Q[\:\\::]; ( my $y = $x ) ~~ s/ Q[\\] /x/; say $y
\:\\::

Nor does this:
my $x = Q[\:\\::]; ( my $y = $x ) ~~ s/ [\\] /x/; say $y
x:\\::

Many thanks,
-T