My PR referred to my locale environment vars but did not include them. Mea culpa. Here they are: MM_CHARSET=KOI8-R LANG=ru_RU.KOI8-R -- Alex Kapranoff, $n=["1another7Perl213Just3hacker49"=~/\d|\D*/g]; $$n[0]={grep/\d/,@$n};print"@$n{1..4}\n"