my @a = (
   @{$s->{aa}->{'1'}},
   @{$s->{bb}->{'1'}},
   @{$s->{cc}->{'1'}},
);