for my $bb_keys (grep /^bb./, keys %hash) {
:
:
}
とか？