Select Code to Download

# suppose %product_id has the "PSLA0L00U00E"-like strings from the DB
# as hash keys, and something useful (row_ids?) as hash values...
...
    }
    print REJ $orig unless ( $orig eq '' );
}

        else {
            my $modelrgx = $model . "?"; # make last character "option
+al"
...
                last;
            }
        }