Help for this page
Select Code to Download
Select
or
download this
perl -le '$s = "abcabdaaa"; $n = 3; print join( "i", split( /a/, $s, $
+
n+1 ))'