@a = map { /a/ ? () : $_ } @a;