Anonymous user
String matching: Difference between revisions
added perl
(added perl) |
|||
Line 135:
loc = [@"abab" rangeOfString:@"ab"].location //returns 0
loc = [@"abab" rangeOfString:@"ab" options:0 range:NSMakeRange(loc+1, [@"abab" length]-(loc+1))].location //returns 2</lang>
=={{header|Perl}}==
<lang perl># the first four examples use regular expressions, so make sure to escape any special regex characters in the substring
"abcd" =~ /^ab/ #returns true
"abcd" =~ /zn$/ #returns false
"abab" =~ /bb/ #returns false
"abab" =~ /ab/ #returns true
my $loc = index("abab", "bb") #returns -1
$loc = index("abab", "ab") #returns 0
$loc = index("abab", "ab", $loc+1) #returns 2</lang>
=={{header|PureBasic}}==
<lang PureBasic>Procedure StartsWith(String1$, String2$)
| |||