|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Artem Chuprina 2:5020/400 07 Mar 2001 13:33:06
To : Alexander Bolotnov
Subject : Re: удаление строки из файла...
--------------------------------------------------------------------------------
Здравствуй, Alexander Bolotnov.
В твоём письме от Tue, 06 Mar 2001 20:37:58 +0300 написано:
AB> Artem,
AB> 06 Mar 01, Artem Chuprina -> Alexander Bolotnov:
>>>> как теперь мне из @lines удалить, скажем, последний элмент
>>>> @lines[$#lines]?
AB>>> хм, что-то торможу я, @lines[$#lines] = ''; сработает,
>> Hет.
AB> open DD, "< lines.txt" or die $!;
AB> @lines = <DD>;
AB> close DD;
AB> print @lines;
AB> @lines[$#lines] = '';
AB> print "\n\n",@lines;
E:\server\test>>perl lines.pl
AB> love
AB> care
AB> dophy
AB> localhost
AB> crap
AB> bummer
AB> love
AB> care
AB> dophy
AB> localhost
AB> crap
AB> что я сделал не так?
AB> результат такой же, как с splice(@lines,-1);
У тебя последний элемент не отсутствует, а равен пустой строке. Так понятно?
--
Artem Chuprina E-mail: ran@ran.pp.ru
Programmer FIDO: 2:5020/371.32
Memonet Ltd. Phone: +7-095-284-1356
--- ifmail v.2.15dev5
* Origin: NTV Internet (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
