Imports System
Imports uCalcSoftware
Public Module Program
   Public Sub Main()
      Dim uc As New uCalc()
      Dim t = uc.NewTransformer()
      t.FromTo("Price: {@Number:amt}", "Price: ${amt}")
      
      Dim input As String = "Item A Price: 19.99, Item B Price: 5"
      Console.WriteLine(t.Transform(input))
   End Sub
End Module