my @matches = /$re/g;

##</code><code>##

while( $line =~ /$re/g ) {
    say $1 // $2;
}