my @As = grep { /A/ } @bigarray;
my @Bs = grep { /B/ } @bigarray;
my @Cs = grep { /C/ } @bigarray;