Select Code to Download

@comparisons = map{ quotemeta } @comparisons;
my $re_comps = '(?:' . join( '|', @comparisons ) . ');
$re_comps = qr[$re_comps];

#! perl -w
use strict;
...
             or $repDay  > $mday && $repMon == $mon && $repYear == $ye
+ar;
    return 1;
}