push @cPosns, $-[0] while $zazb =~ m{c}g;