seq{shift=~join".*",split//,pop}


##</code><code>##

seq{shift=~join".*",pop=~/./g}


##</code><code>##

seq{shift=~join"\E.*\Q","",pop=~/./gs}