Select Code to Download

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

#! perl
use strict;
...

say 'With or:';
say $db_error_data{$hour}{$error}{$sub_user_error} or 0, $number;

22:40 >perl 1619_SoPW.pl
Useless use of private variable in void context at 1619_SoPW.pl line 1
+7.
...
0

22:40 >