fork(1) download 
  1. Imports System
  2. Imports System.Text.RegularExpressions
  3.  
  4. Module Test
  5. 	Sub Main()
  6. 		Dim regex As New Regex("(?<=^[^:]*;\s*)[^\s:](?=[^:]*(?:$|:))", RegexOptions.Multiline)
  7. 		Dim input As String =
  8. 			"[Foo][Bar]Foo bar foo bar: foo; bar: foo bar foo bar __" & vbCrlf &
  9. 			"[Foo][Bar]Foo; bar: foo bar __ foo bar foo bar" & vbCrlf &
  10. 			"[Foo]Foo bar foo bar foo bar: foo __ bar; foo bar __ foo bar" & vbCrlf &
  11. 			"[Bar]Foo; bar; foo"
  12.  
  13. 		Console.WriteLine(regex)
  14. 		Console.WriteLine(regex.Replace(input, AddressOf ConvertToUppercase))
  15. 	End Sub
  16.  
  17. 	Function ConvertToUppercase(match As Match) As String
  18. 		Return match.Groups(0).Value.ToUpper()
  19. 	End Function
  20. End Module
Success #stdin #stdout 0.06s 25324KB
comments (?)
stdin 
Standard input is empty
stdout 
(?<=^[^:]*;\s*)[^\s:](?=[^:]*(?:$|:))
[Foo][Bar]Foo bar foo bar: foo; bar: foo bar foo bar __
[Foo][Bar]Foo; Bar: foo bar __ foo bar foo bar
[Foo]Foo bar foo bar foo bar: foo __ bar; foo bar __ foo bar
[Bar]Foo; Bar; Foo
https://ideone.com/WgPqYd
language:
VB.NET (mono-3.10)
created:
2 years ago
visibility:
secret

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!