Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
1
Task/String-matching/Perl/string-matching-5.pl
Normal file
1
Task/String-matching/Perl/string-matching-5.pl
Normal file
|
|
@ -0,0 +1 @@
|
|||
my $i = -1; print $i, "\n" while ($i = index $str1, $str2, $i + 1) != -1; # using index
|
||||
Loading…
Add table
Add a link
Reference in a new issue