my ($db_dt,$enq_dt, $ecn, $kob, $userid, @fids) = @ARGV;

if ($db_dt =~ /^[^0-9]$/ || $enq_dt =~ /^[^0-9]$/ || $userid =~ /^[^a-zA-Z0-9]$/ || $ecn =~ /^[^0-9]$/ $kob =~ /^[^A-Z0-9]$/)
{
        print("Invalid db_dt or enq_dt or userid or ecn or kob: ",__LINE__, "\n");
}

print("Start of db2Json == " . get_time() . " in ${db_dt} image as of ${enq_dt}\n");  <== Error