Help for this page
Select Code to Download
Select
or
download this
$ perl -wle '"abacbcc" =~ /a.*b.*c(?{ $count++ })(?!)/; print $count' 7