ExtractRegularExpression + Structured Arrays
Posted: Wed Jul 03, 2013 12:16 pm

It will be very nice if something like this will be implemented:
Code: Select all
ExtractRegularExpression(0, string$, Array()\Structure1)
http://www.purebasic.com
https://www.purebasic.fr/english/
Code: Select all
ExtractRegularExpression(0, string$, Array()\Structure1)
Code: Select all
Structure MyStruct
Array MyArray.s(100)
EndStructure
Define MS.MyStruct
subject.s = " addonaddedaddition add readd added addadd "
pattern.s = "\w*add\b"
id.i = CreateRegularExpression(#PB_Any, pattern)
If id
NbFound = ExtractRegularExpression(id, subject, MS\MyArray())
For k = 0 To NbFound-1 : Debug MS\MyArray(k) :Next
Else
Debug RegularExpressionError() : End
EndIf