Select Code to Download

    if ( $config[$m]{Vendor} =~ /$products[$n]{Name}/ ) {

#!/usr/bin/perl

...
    }       
}

foreach my $prod (@products) {
    next if !exists $$prod{'Vendor Item ID'};
...
    }
}