Forum Webscript.Ru
Программирование => Perl => Тема начата: Ilya от 21 Апреля 2001, 11:54:17
-
Есть масив, каторый содержит 20 строк.
Как сделать, чтобы масив выводился по 5 строк, и ссылки для перехода на следующие 5 строк? (Как в гостевой)
-
ILYA (21-04-2001 11:54):
Есть масив, каторый содержит 20 строк.
Как сделать, чтобы масив выводился по 5 строк, и ссылки для перехода на следующие 5 строк? (Как в гостевой)
Сия тайна велика есть! :)
-
Никто не знает?
-
ILYA (24-04-2001 16:26):
Никто не знает?
Знают-то куча народа, только вот писать об этом лень. Односложно не ответить. Простой пример не приведешь. Так что посмотри как работать с массивами и все поймешь сам. ;-)
-
ILYA (24-04-2001 16:26):
Никто не знает?
А вы расскажите ваши соображения по теме, а мы поглумимся.
И может набредем на решение :)
-
arto (25-04-2001 09:20):
А вы расскажите ваши соображения по теме, а мы поглумимся.
И может набредем на решение :)
Какой же ты вредный, arto. ;-) Что значит поглумимся?!
К Илье : ну че? нашел решение? Если нет, не стесняйся - пиши!
-
Только сегодня хотел запостить похожее сообщение. Глумиться-глумитесь, только сильно ногами не пинайте. Я кое-как с грехом пополам сделал переходы по страницам, но загвоздка вот в чём: если в массиве оказывается например 23 строки, а нам нужно выводить по 10 строк, то скрипт делает 3 страницу, на которой 3 строки, а следущие 7 как бы нулевые, т.е. выводится оформление, но инфы нету. как это обойти? Вот текст скрипта:
$mess = 10;
$countofrazdel=@razdel;
$pageend=$page+$mess-1;
sub view {
print "";
print "| Название | Текст | Цена | ";
for($i=$page;$i<=$pageend;$i++)
{
($identificator,$title,$text) = split(/::/,$razdel[$i]);
print "
| $title | $text | $price |
";
}
print "
";
&messperpage;
}
sub messperpage
{
$all = int(($countofrazdel-1) / $mess)+1;
print "Страница: - ";
for($i=1;$i <= $all;$i++)
{
$to=$i*$mess-$mess;
$a=$page/$mess+1;
if($a ne $i)
{print " $i - ";}
else
{print " $i - ";}
}
print "";
}
-
Что-нибудь типа:
for($i=$page;$i<=$pageend;$i++)
{
if($identificator ne "")
{
($identificator,$title,$text) = split(/::/,$razdel[$i]);
print "| $title | $text | $price |
";
}
}
-
Ну конечно :-). Элементарно Ватсон....Что-то я немного проглючил :)
Только небольшое дополнение: проверку необходимо перенести после разделения строки, иначе выводится одна пустая строка.
for($i=$page;$i<=$pageend;$i++)
{
($identificator,$title,$text) = split(/::/,$razdel[$i]);
if($identificator ne "")
{
print "| $title | $text | $price |
";
}
}
-
:) Вот и чудненько :)
-
О! :)
-
В догонку :)
Кстати спасибо за совет и новая просьба.
Нужно взять из массива к примеру 25 строку и заменить её, на новую. Как это можно сделать?
-
этот вопрос уже оч.подробно тут рассматривался.
поищи на форуме
-
или купи книжку по перлу
-
Сначала сенкс всем за ответы.
То: AliMamed
Я сначала тыкнул в поиск, но мне он выдал не то, что мне нужно было. Я и решил сообщение запостить. Видать так искал :-)Сейчас покопался в старых сообщениях и нашёл ответ на свой вопрос.
То: lodevar
Книжка по перлу у меня есть, но только в ней этого момента не было, я покопался в инете, подумав, что существует оператор который заменяет строки в массиве. Нашёл 2 строки про splice, но так и не разобрался. Теперь всё понятно...
Ещё раз сенкс :)
-
Sonic (27-04-2001 10:10):
То: lodevar
Книжка по перлу у меня есть, но только в ней этого момента не было, я покопался в инете, подумав, что существует оператор который заменяет строки в массиве. Нашёл 2 строки про splice, но так и не разобрался. Теперь всё понятно...
Ещё раз сенкс :)
Минуточку... Какой splice?
@massiv[25]="novoe znachenie";
Неужели это не работает ???
-
lodevar (27-04-2001 10:18):
Sonic (27-04-2001 10:10):
То: lodevar
Книжка по перлу у меня есть, но только в ней этого момента не было, я покопался в инете, подумав, что существует оператор который заменяет строки в массиве. Нашёл 2 строки про splice, но так и не разобрался. Теперь всё понятно...
Ещё раз сенкс :)
Минуточку... Какой splice?
@massiv[25]="novoe znachenie";
Неужели это не работает ???
Ты будешь сильно удивлен :-)
$massiv[25] = "novoe znachenie";