while (my @row = $common::sql::sth->fetchrow()){
 
my $daily_time = sprintf("%d:%02d",$row[4],$row[5]);

my ($total_minutes, $total_hours, $all_minutes, $total_time_hours, $total_time_minutes);
    
    $total_minutes  = $row[5];
    $total_hours = $row[4] * 60;

    
    $all_minutes = $total_hours + $total_minutes;

    $total_time = $total_time + $all_minutes;