Data update

Task/Regular-expressions/FutureBasic/regular-expressions.basic

@@ -0,0 +1,20 @@
+void local fn DoIt
+  CFStringRef string = @"I am a string"
+  CFStringRef fmt = @".*string$"
+  PredicateRef pred = fn PredicateWithFormat( @"SELF MATCHES %@", fmt )
+
+  if ( fn PredicateEvaluateWithObject( pred, string ) )
+    printf @"\"%@\" ends with \"string\"",string
+  end if
+
+  print
+
+  CFStringRef orig = @"I am the original string"
+  RegularExpressionRef regex = fn RegularExpressionWithPattern( @"original", 0, NULL )
+  CFStringRef result = fn RegularExpressionStringByReplacingMatches( regex, orig, 0, fn CFRangeMake(0,len(orig)), @"modified" )
+  print result
+end fn
+
+fn DoIt
+
+HandleEvents