if ($mystr =~ /(?=a)/gi) { $position = pos($mystr); }