Help for this page

Select Code to Download

Select or download this

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 lin
+e 1.
...
match: f, pos = 7

19:41 >