Select Code to Download

sub comp {
    return undef unless length $_[0] == length $_[1];
...
    }
    return "+$where" if defined $where;
}