while(@times) {
    push @{$data{shift @times}}, shift @times;
}