Rosetta Code

String matching: Difference between revisions

Page Discussion

String matching (view source)

Revision as of 05:35, 16 October 2010

137 bytes added ,  13 years ago
m
→‎{{header|PureBasic}}: Added support for multiple occurrences
(→‎{{header|PureBasic}}: Added PureBasic)
m (→‎{{header|PureBasic}}: Added support for multiple occurrences)
Line 115:
</lang>
=={{header|PureBasic}}==
<lang PureBasic>Procedure StartsWith(String1$, String2$)Protected Result
If FindString(String1$, String2$, 1) =1 ; E.g Found in position 1
Protected Result
If FindString Result =CountString(String1$, String2$, 1) =1 ; E.g Found in possition 1
Result =#True
EndIf
ProcedureReturn Result
Line 126 ⟶ 125:
Protected Result, dl=Len(String1$)-Len(String2$)
If dl>=0 And Right(String1$, Len(String2$))=String2$
Result =#TrueCountString(String1$, String2$)
EndIf
ProcedureReturn Result
EndProcedure</lang>
And a verification
<lang PureBasic>Debug StartsWith("Rosettacode", "Rosetta") ; = 1
Debug StartsWith("Rosettacode", "code") ; = 0
Debug StartsWith("eleutherodactylus cruralis", "e") ; = 3
Debug EndsWith ("Rosettacode", "Rosetta") ; = 0
Debug EndsWith ("Rosettacode", "code") ; = 1</lang>
Debug EndsWith ("Rosettacode", "e") ; = 2</lang>
 
=={{header|Python}}==
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/160611"