|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Andrew Perevodchik 2:5020/400 07 Nov 2000 23:33:01
To : All
Subject : Последний элемент списка
--------------------------------------------------------------------------------
Приветствую!
Имеется кусок кода:
$back = "one/two/three/for/five"; #1
split (/\//, $back); #2
foreach (@_) { #3
$nav .= "<a href=$_>$_</a> |>\n"; #4
} #5
print $nav; #6
Выводит ясно что. Всё нормально.
Hадо каким-то образом заставить выводить его следующее:
<a href=one>one</a> |>
<a href=two>two</a> |>
<a href=three>three</a> |>
<a href=four>four</a> |>
five :
т.е. что м ПОСЛЕДHИЙ елемента из списка (который после побития строки
получается) дописывался в $nav по другому шаблону (я имею ввиду
команду print в четвертой строке). Очень желательно, что б код был
покороче. И вообще, есть ли способ в цикле foreach узнать, в последний
раз он исполняется или нет?
--
Отправлено через сервер Talk.Ru - http://www.talk.ru
--- ifmail v.2.15dev5
* Origin: Phone Server (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
