|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Ivan Frolcov 2:5020/175.2 01 Feb 2002 20:37:24
To : Aleksey Kotov
Subject : Как из списка @list удалить скаляр $num
--------------------------------------------------------------------------------
>>> @list_in = (1001,1002,1003,1004,1005);
>>> $num=1003;
>>>
>>> $rt=join(/=/,@list_in);
>>>
>>> print "$rt\n";
>>> $rt=~s/$num//;
>>>
>>> @list_out=split(/=/,$rt);
>>> print "@list_out\n";
AS>> Если встречу такой в перловом коде такой "перл" (извините за
AS>> каламбур), удавлю и код и, по возможности, автора.
AK> Это работает? Работает.
В _данном_ случае.
AK> Это непонятно? Понятно.
AK> Что еще надо? Записать все вышеизложенное одной строкой?
Сделать так, чтобы работало всегда.
AK> Может быть это очень медленнно и требует много ресурсов?
AK> Меня это не волнует. Если вас волнует - просто купите себе еще памяти...
Если ты используешь перл исключительно в целях самовыражения - на здоровье.
Если ты используешь его не в таких целях - лучше не надо. Это растрата денег
заказчика и подкладывание большой и толстой свиньи тем, кто будет работать с
твоим кодом после тебя. Извини, ТАК писать - безнравственно, как и ссать,
например, в подъездах.
PS 2All Сорри за резкость, наболело. Один кадр тоже любил подобные приколы. В
результате, например, предлагают на боевом сервере СРОЧHО приделать некую
погребень. Сервер при этом падать не должен - боевой и популярный. А написано
все как раз в таком вот стиле - кашица из perl'а, javascripta и html'я. Hет,
местами есть забавные фичи, но _местами_. Блин, ну чего я в грузчики не пошел?
--- ifmail v.2.15
* Origin: FidoNet Online - http://www.fido-online.com (2:5020/175.2)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
