Help for this page

Select Code to Download


  1. or download this
    
    
    ...
    %mainVars;
    $mainVars = \%mainVars;
    main($msgLVL);
    
  2. or download this
    sub main
    {
    ...
    
        print "-- Leaving [$sub]\n" if $msgLVL > 1;
    }