in reply to Random Unitialized Value Errors

I think it is because there is no value for
DbLog =
specifically coming from busopp:/orasys00/app/oracle/product/9.2.0:Y:Y

Are you sure there is a file when you run this for busopp?
$dbLogLst{$dbName} = < $ENV{'DIAG'}/$dbName/log/alert_$dbName.log >;