ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Ivan Frolcov 2:5020/175.2 01 Jun 2004 11:30:06
To : Andrei Protasovitski
Subject : Re: Первые/последние n слов.
--------------------------------------------------------------------------------
Tue Jun 01 2004 10:43, Andrei Protasovitski wrote to sklm:
>> $N = 3;
>> $_ = 'aaa bbb ccc ddd eee fff';
>> @words = split;
>> @First_N_Words = @words[0..$N-1];
>> print "@First_N_Words\n";
>> @Last_N_Words = @words[-$N..-1];
>> print "@Last_N_Words\n";
AP> Это и ежу понятно. Я бы хотел без доп. массивов.
Тоже мне бином Hьютона.
(split)[0..$N]
--- ifmail v.2.15dev5
* Origin: FidoNet Online - http://www.fido-online.com (2:5020/175.2)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
