if ($paramno == 0) { print "\n\tNo parameters supplied - can't set up environment!\n" ; return 0; } #### my %DBhashlookup = ( "TEST" => \%TEST, "LIVE" => \%LIVE, "DEVLP" => \%DEVLP, ) ; #### xxrctest S T A R T S KEY :: ADMIN_DIR VALUE :: /opt/bin2 xxrctest E N D S