19:40 >perl -wE "my $s = 'abCdefC'; while ($s =~ / (f)*? C /gx) { say qq[match: $1, pos = ], pos $s; }" Use of uninitialized value $1 in concatenation (.) or string at -e line 1. match: , pos = 3 match: f, pos = 7 19:41 >