Build a hash keyed on the names, and add the times

my %hash;
my ($name,$time);
while (@array) {
    $time = pop @array;
    $name = pop @array;
    $hash{$name} += $time;
}
[download]

The while (@array) condition remains true as long as @array is not empty. I use pop so that @array doesn't move. You may need to adapt if your time elements are formatted to exclude simple arithmetic.

After Compline,
Zaxo