|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : vilfred 2:5020/400 08 Apr 2002 09:32:09 To : All Subject : реализация связных списков --------------------------------------------------------------------------------
Привет аллу!
натолкнулся на www.linux.org.ru на вопрос в
++++++++++++++++++++++++++++++++++++++++
связный список на перле
Hужно очень срочно написать связный список на
перле. Самый стандартный вариант, как на си и
паскале, как бы странно это ни казалось. Hо не
получается:(( Hужно просто в цикле добавлять туда
элементы.
Hаписал так:
$top={};
while (1)
{
# $a=<STDIN>;
if (($a=<STDIN>)==999) {last}
else
{
$list{'num'}=$a;
$list{'next'}=$top;
$q=\%list;
$top=$q;
}
Что неправильно??
Спасибо.
chipolinous@yahoo.com
++++++++++++++++++++++++++++++++++++++++
что это такое вообще связные списки?
Дима
p.s. вообще последнее время перл кажется(в линухе
сижу) самым высокоуровневым языком, сделать
дочерта всего можно, если не все :))
--
TEAM [Маньяки]
форуме(http://www.linux.org.ru/view-message.jsp?msgid=176428&scroll=group&back
=view-group.jsp%3Fgroup%3D126&nocache=-1491508011):
Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru
--- ifmail v.2.15dev5
* Origin: Talk.ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/6488f4f1df27.html, оценка из 5, голосов 10
|