|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Maxim Y. Zinyakov 2:5065/21 02 Jan 2001 15:44:26 To : Ivan Prokudin Subject : Слова в обратном порядке --------------------------------------------------------------------------------
30 Dec 00 17:58, you wrote to ALL:
IP> Есть $a='zzz aaa ttt'
IP> Hадо получить $b='ttt aaa zzz'
IP> Можно ли это как-нить сделать короче чем
IP> $b=join (/ /, reverse split (/ /,$a)
IP> ?
насчет короче - не знаю, а по-другому можно:
$b=join" ",reverse eval("qw/$a/")
:)
Удачи!
*Maqs.* [max@surt.sochi.ru]
--- GoldED/LNX 3.0.1
* Origin: WARNING! System paused: waiting for the miracle... (2:5065/21)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/18133a51ea3a.html, оценка из 5, голосов 10
|