Select Code to Download

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

!/usr/bin/perl
use warnings;
...
 
close $in;
close $out;