$hourly_count{"$h:$rd"} += $normalyzed_info{$k}{chronos}{$d}{$h}{min}{$m};
$hourly_duration{"$h:$rd"} += ($normalyzed_info{$k}{chronos}{$d}{$h}{min_duration}{$m} || 0);
}
- foreach my $rd (@histo_avgs) {
- next if (!exists $hourly_count{"$h:$rd"});
- $details .= "<tr><td>$zday</td><td style=\"text-align: right\">$h:$rd</td><td>" .
- &comma_numbers($hourly_count{"$h:$rd"}) . "</td><td>" .
- &convert_time($hourly_duration{"$h:$rd"}) . "</td><td>" .
- &convert_time($hourly_duration{"$h:$rd"}/($hourly_count{"$h:$rd"}||1)) . "</td></tr>";
+ if ($#histo_avgs > 0) {
+ foreach my $rd (@histo_avgs) {
+ next if (!exists $hourly_count{"$h:$rd"});
+ $details .= "<tr><td>$zday</td><td style=\"text-align: right\">$h:$rd</td><td>" .
+ &comma_numbers($hourly_count{"$h:$rd"}) . "</td><td>" .
+ &convert_time($hourly_duration{"$h:$rd"}) . "</td><td>" .
+ &convert_time($hourly_duration{"$h:$rd"}/($hourly_count{"$h:$rd"}||1)) . "</td></tr>";
+ }
}
}
}
$hourly_count{"$h:$rd"} += $normalyzed_info{$k}{chronos}{$d}{$h}{min}{$m};
$hourly_duration{"$h:$rd"} += ($normalyzed_info{$k}{chronos}{$d}{$h}{min_duration}{$m} || 0);
}
- foreach my $rd (@histo_avgs) {
- next if (!exists $hourly_count{"$h:$rd"});
- $details .= "<tr><td>$zday</td><td style=\"text-align: right\">$h:$rd</td><td>" .
- &comma_numbers($hourly_count{"$h:$rd"}) . "</td><td>" .
- &convert_time($hourly_duration{"$h:$rd"}) . "</td><td>" .
- &convert_time($hourly_duration{"$h:$rd"}/($hourly_count{"$h:$rd"}||1)) . "</td></tr>";
+ if ($#histo_avgs > 0) {
+ foreach my $rd (@histo_avgs) {
+ next if (!exists $hourly_count{"$h:$rd"});
+ $details .= "<tr><td>$zday</td><td style=\"text-align: right\">$h:$rd</td><td>" .
+ &comma_numbers($hourly_count{"$h:$rd"}) . "</td><td>" .
+ &convert_time($hourly_duration{"$h:$rd"}) . "</td><td>" .
+ &convert_time($hourly_duration{"$h:$rd"}/($hourly_count{"$h:$rd"}||1)) . "</td></tr>";
+ }
}
}
}
$hourly_count{"$h:$rd"} += $normalyzed_info{$k}{chronos}{$d}{$h}{min}{$m};
$hourly_duration{"$h:$rd"} += ($normalyzed_info{$k}{chronos}{$d}{$h}{min_duration}{$m} || 0);
}
- foreach my $rd (@histo_avgs) {
- next if (!exists $hourly_count{"$h:$rd"});
- $details .= "<tr><td>$zday</td><td style=\"text-align: right\">$h:$rd</td><td>" .
- &comma_numbers($hourly_count{"$h:$rd"}) . "</td><td>" .
- &convert_time($hourly_duration{"$h:$rd"}) . "</td><td>" .
- &convert_time($hourly_duration{"$h:$rd"}/($hourly_count{"$h:$rd"}||1)) . "</td></tr>";
+ if ($#histo_avgs > 0) {
+ foreach my $rd (@histo_avgs) {
+ next if (!exists $hourly_count{"$h:$rd"});
+ $details .= "<tr><td>$zday</td><td style=\"text-align: right\">$h:$rd</td><td>" .
+ &comma_numbers($hourly_count{"$h:$rd"}) . "</td><td>" .
+ &convert_time($hourly_duration{"$h:$rd"}) . "</td><td>" .
+ &convert_time($hourly_duration{"$h:$rd"}/($hourly_count{"$h:$rd"}||1)) . "</td></tr>";
+ }
}
}
}
my $rd = &average_per_minutes($m, $histo_avg_minutes);
$hourly_count{"$h:$rd"} += $error_info{$k}{chronos}{$d}{$h}{min}{$m};
}
- foreach my $rd (@histo_avgs) {
- next if (!exists $hourly_count{"$h:$rd"});
- $details .= "<tr><td>$zday</td><td style=\"text-align: right\">$h:$rd</td><td>" .
- &comma_numbers($hourly_count{"$h:$rd"}) . "</td></tr>";
+ if ($#histo_avgs > 0) {
+ foreach my $rd (@histo_avgs) {
+ next if (!exists $hourly_count{"$h:$rd"});
+ $details .= "<tr><td>$zday</td><td style=\"text-align: right\">$h:$rd</td><td>" .
+ &comma_numbers($hourly_count{"$h:$rd"}) . "</td></tr>";
+ }
}
}
}