my %lookup = ();
foreach my $grp (keys %groups) {
    push @{$lookup{$_}}, $grp foreach @{$groups{$grp}};
}
...
foreach my $name (@usernames) {
    $output($time){$_}++ foreach @{$lookup{$name}};
}