Re: split this

[Tyke]

I think that you _can_ do it with a split:

perl -le "print for split /(?=[^~\/](?:.|$))/,shift" "E/sYna~ko/"

looks as if it works on your test data.

Update Actually that should have been

perl -le "print for split /(?=[^~\/])/,shift" "E/sYna~ko/"

but you saw that