Mooch a regex

[ToddAndMargo]

Hi All,

Would yo all terribly mind if I ask how to do this Perl 5 regex
in Perl 6?  (I learn best by example.)


<code>
if ( $ClickLine =~ /aes256/ and /${BaseTag}/ ) {
              push ( @WebClickHere, $ClickLine );

               if ( $Line =~ m{select id=\"(.*?)[-]} ) {
                  my $VerLine = $1;
                  push ( @WebVersions,  $VerLine );
               }
            }
</code>

Many thanks,
-T

--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Computers are like air conditioners.
They malfunction when you open windows
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~