>уважаемые гуру,
>как в перле поизящьнее преобразовать строку вида 1234567890 в 2143658709 (т.е. попарно
>поменять символы местами)?

Я не гуру, поэтому не очень изячьно. Но вроде работает:

perl -e '$a = "1234567890"; $a =~ s/(.)(.)/$2$1/g; print "$a\n"'

Впрочем, потестить и перепроверить не помешает.

Спасибо
Работает. То что нужно!

>уважаемые гуру,
>как в перле поизящьнее преобразовать строку вида 1234567890 в 2143658709 (т.е. попарно
>поменять символы местами)?