The Perl 6 <?ws> token

token ws {
    [ \s+
    | ^^ [ \# \N*
         | <?pod_comment>
         ]
    | \# [ <?PGE::Text::bracketed: <({[>
         | \N*
         ]
    ]*
}