Select Code to Download

#!/usr/bin/perl -w
#
...
&ACC_IHS_PROFILE($db) or die "\n\tBottom - Sub Failed!\n" ;

print "\n\t$script E N D S\n" ;

        xxrctest S T A R T S
Argument "/opt/bin2" isn't numeric in each at ACC_IHS_PROFILE.pl line 
+85.
Bad index while coercing array into hash at ACC_IHS_PROFILE.pl line 85
+.