( $_ eq "b" ) and $b ++ foreach @a ;