'
Dim text, pattern As String
pattern = "[!@#$%¨&*()+=\-\[\]~´;/:?}{`\^<>|\\]"
text = "hello\world"
Dim Matcher1 As Matcher
Matcher1 = Regex.Matcher(pattern, text)
Do While Matcher1.Find
Log("Found: " & Matcher1.Match)
Loop
text = "hello^world"
Matcher1 = Regex.Matcher(pattern, text)
Do While Matcher1.Find
Log("Found: " & Matcher1.Match)
Loop
text = "!@#$%¨&*()+=-[]~´;/:?}{`^<>|\"
Log(text.Length)
text = "hello!@#$%¨&*()+=-[]~´;/:?}{`^<>|\world"
Matcher1 = Regex.Matcher(pattern, text)
Dim found As Int = 0
Do While Matcher1.Find
Log("Found: " & Matcher1.Match)
found = found + 1
Loop
Log(found)