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