my $date = $ARGV[0];
$date or $date = `date --date='1 hour ago' +%Y-%m-%d`;
chomp $date;

##</code><code>##

foreach my $sub_user_error (@db_user_errors)
{
       $worksheet->write( $row, $col, $db_error_data{$hour}{'Submission_user_error'}{$sub_user_error} or 0, $number);
       $col++;
}
$row++;

##</code><code>##

 
foreach my $sub_user_error (@db_user_errors)
{
     if ($db_error_data{$hour}{'Submission_user_error'}{$sub_user_error} eq "")
     {
         $worksheet->write( $row, $col, 0, $number);
         $col++;
     }
     else
     {
         $worksheet->write( $row, $col, $db_error_data{$hour}{'Submission_user_error'}{$sub_user_error}, $number);
         $col++;
     }
}
$row++;