|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Dmitriy Kuvshinov 2:5020/400 08 Nov 2000 00:56:30
To : Andrew Perevodchik
Subject : Re: Последний элемент списка
--------------------------------------------------------------------------------
Привет!
AP> $back = "one/two/three/for/five";
AP> split (/\//, $back);
AP> foreach (@_) {
AP> $nav .= "<a href=$_>$_</a> |>\n";
AP> }
AP> print $nav;
AP> Hадо каким-то образом заставить выводить его
AP> следующее:
AP> <a href=one>one</a> |>
AP> <a href=two>two</a> |>
AP> <a href=three>three</a> |>
AP> <a href=four>four</a> |>
AP> five :
$back = "one/two/three/for/five";
split (/\//, $back);
foreach (0 .. $#_){
print "<a href=$_[$_]</a> |>\n" if($_ != $#_);
}
print $_[#$_],":";
не знаю, будет ли так работать, но идея в принципе такая...
AP> покороче. И вообще, есть ли способ в цикле
AP> foreach узнать, в последний
AP> раз он исполняется или нет?
foreach $line(0 .. $#mass){
print $mass[$line] if($line != $#mass);
}
print $mass[#$mass];
фишка в том, что #$mass показывает размерность массива @mass.
Дима
--
...
Вы никогда вместо точки не ставили в конце предложения точку с запятой?
Отправлено через сервер Talk.Ru - http://www.talk.ru
--- ifmail v.2.15dev5
* Origin: Talk.ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: Последний элемент списка 
