Imports System
Imports uCalcSoftware
Public Module Program
   Public Sub Main()
      Dim uc As New uCalc()
      Dim t = uc.NewTransformer()
      
      t.FromTo("({@Alphanumeric:txt})", "<Alpha str={txt}>")
      
      Console.WriteLine(t.Transform("Testing 123 (456) (abc) ('text') (xyz111)"))
   End Sub
End Module