in reply to How do I match this without lookbehind?
my @results = $string =~ m!~([^~]+)!g; [download]
Originally posted as a Categorized Answer.