Select Code to Download

my @regexes;
if ($param eq 'mod') {
...
} else {
    @regexes = ...
}

&[^;]+;\s&[^;]+;

#!/usr/bin/perl
use warnings;
...

close $in;
close $out;