I need unprintable regex help

[ToddAndMargo via perl6-users]

Hi All,

   my Str $CrLf   = chr(0x0d) ~ chr(0x0a);
   $String ~~ s:global/ $CrLf /\n/;

How do I get rid of the extra $CrLf variable?

Many thanks,
-T