Imports System
Imports uCalcSoftware
Public Module Program
   Public Sub Main()
      Dim uc As New uCalc()
      Dim t As New uCalc.Transformer()
      Dim text As String = "Replace config, but not the one inside [RAW]this config is raw[/RAW]."
      
      '// Create a token set for the raw block that only tokenizes single characters.
      Dim rawTransformer As New uCalc.Transformer()
      Dim rawTokens = rawTransformer.Tokens
      rawTokens.Clear()
      rawTokens.Add(".") '// Match any single character
      
      '// Switch to rawTokens when [RAW] is found, and switch back at [/RAW].
      t.Tokens.ContextSwitch(rawTokens, "\[RAW\]", "\[/RAW\]")
      
      t.FromTo("config", "SETTING")
      
      Console.WriteLine(t.Transform(text))
   End Sub
End Module