/Some . Regex/;
rx/asdf/;
m/asdf/;
rx{ x.x };
rx| x.x |;

s/a/b/;
S/a/b/;
s{x.x} = 5;

token a { x.x }
rule b { x.x }
regex c { x.x }

regex hiea {
    # Basics
    literal \$\%\$\*\'
    \s\p\e\c\i\a\l
    'quoted stuff \a\b\.\"\' \\'

    # Stuff with <
    <?before lookarounds>
    <call>
    $<named-capture>=[some stuff]

    # Variables
    :my $*some-var = 5;
    :my $*another-var;

    # Interpolation
    $some-var $*other-var @array-var %not-a-var
    <$some-var>
    $(if True { "yes" } else { "no" })
    <{if True { "yes" } else { "no" }}>

    # Code
    { if $I-don't-like-this { False } }
}
