Select Code to Download

#This is the main script
#!/usr/bin/perl
...

product_search::search($si1, $fullSearch);

#!/cygdrive/c/Perl/bin/perl

...
    print "$product\n\n";
        
} 1;