Select Code to Download

#!/usr/bin/perl

...
                print "yes. Great!\n";
    }
}

$ ./eod.pl ln
=========== DATE INITIALIZATION ===========
...
"SPLbatchNew lastcompdate" - is 07/03/2009 todays business day for tha
+t region? no. This is a problem. It should be 07/08/2009
"SPLbatchNew rundate" - is 07/03/2009 todays business day for that reg
+ion? no. This is a problem. It should be 07/08/2009
$