foreach (@input) {
 push(@{$collate{$_->{department}}}, $_);
}