[perl #125383] regex source doesn't contain "token"/"regex"/"rule"

[via RT]

# New Ticket Created by  Timo Paulssen 
# Please include the string:  [perl #125383]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=125383 >


The first three of these ought to output a bit more, IMO, just like the
last one does.

    > perl6 -e 'my $r = regex { foo }; say $r.perl'
    { foo }
    > perl6 -e 'my $r = token { foo }; say $r.perl'
    { foo }
    > perl6 -e 'my $r = rule { foo }; say $r.perl'
    { foo }
    > perl6 -e 'my $r = rx{ foo }; say $r.perl'
    rx{ foo }