in reply to cut of first char of a string
$_='0123456789' ;s;.(?=(.+));$1;s&&s;(.+)(\1);$1;s; [download]