Просмотр сообщений
1
Обсуждение сайтов / Посмотрите и оцените!
« : 04 Декабря 2006, 14:06:09 »
Вот сделал сайт чего там не хватает скажите плиз! http://www.nomerok.net/cgi-bin/index.cgi
Новости:
Просмотр сообщений
В этом разделе можно просмотреть все сообщения, сделанные этим пользователем.
Страницы: [1] 2
4
Код: [Выделить]
opendir (TN, "gallery");
rewinddir (TN);
@TN = grep(!/^\\.\\.?$/, readdir (TN));
closedir (TN);
for ($i=0; $i<=$#TN; $i++) {
print "
";
Как сделать чтобы он по три картинки на строку выдавал
5
ОС и системное ПО / FreeBSD - список комманд
« : 08 Февраля 2006, 18:55:35 »Цитировать
alex007:
в поисковой машине Yandex и Google уже давно всё вылаженно! не такоуж такой и большой секрет.
Чтото у меня не получилось найти может выложешь мне плиз =)
6
ОС и системное ПО / FreeBSD - список комманд
« : 08 Февраля 2006, 18:38:53 »
Выложите список комманд плиз! =)
А конкретнее мне нужно как через Putty посмотреть выполняемые процесы!
тока не пишите ps -ax =)
А конкретнее мне нужно как через Putty посмотреть выполняемые процесы!
тока не пишите ps -ax =)
7
Perl / Может ли Perl создавать папки?
« : 01 Ноября 2005, 11:30:42 »
Значит и удалить их можно так?
9
Perl / Может ли Perl создавать папки?
« : 31 Октября 2005, 10:12:25 »
Вот *.txt может создавать а вот папки? Если да то наверное и скрипт простой... напишите если кто знает!
10
Perl / Помогите Plz
« : 30 Октября 2005, 18:12:17 »
Мне нуже пример что бы я разобрался куда именно вставлять код который ты привела. Самы простой пример ...
Вот что мне нужно и всё =))
Вот что мне нужно и всё =))
11
Perl / Counter lite
« : 28 Октября 2005, 01:52:37 »
У меня вот вопрос а можно сделать такой счётчик который не записывает в текстовый файл, а просто показывает активных пользователей!
Например:
зашёл я и он запоминает меня по ip.
заходит другой и тоже запоминает по ip.
И просто показывает кол-во человек на сайте.
наверное бред какойто ...
но всё таки если кто знает подскажите плиз!
Например:
зашёл я и он запоминает меня по ip.
заходит другой и тоже запоминает по ip.
И просто показывает кол-во человек на сайте.
наверное бред какойто ...
но всё таки если кто знает подскажите плиз!
12
Perl / Помогите Plz
« : 27 Октября 2005, 21:28:09 »#Что тут вера ... хотя бы намёк ... а то ...
#НУ была задумка ... ну не получается у меня!
#2-ой месяц изучаю Перл, до етого ни чего не изучал!
13
Perl / Помогите Plz
« : 27 Октября 2005, 15:44:40 »Цитировать
Error202:
А вдруг тебе надо перейти к последней странице... Может там что полезное... Перибирать все десятки, если страниц более 5000 - до вечера...
У меня не будет больше 10 страниц =))
14
Perl / Помогите Plz
« : 27 Октября 2005, 15:42:49 »
Что есть $total,how,now
А простой пример можешь привести а то я что то не разберусь
Тоесть
у меня текст допустим 1.txt
там
написано
1
2
3
4
5
тобишь 5 строчек
две на одной странице
ещё 2 на другой
и последняя на третьей.
В итоге:
1
2
Страница: [1] 2 3
________________
3
4
Страница: 1 [2] 3
________________
Если дашь такой код цены тебе не будет! =))
А простой пример можешь привести а то я что то не разберусь
Тоесть
у меня текст допустим 1.txt
там
написано
1
2
3
4
5
тобишь 5 строчек
две на одной странице
ещё 2 на другой
и последняя на третьей.
В итоге:
1
2
Страница: [1] 2 3
________________
3
4
Страница: 1 [2] 3
________________
Если дашь такой код цены тебе не будет! =))
15
Perl / Помогите Plz
« : 27 Октября 2005, 15:09:26 »
=)) Код кто нить подскажет 
=) ты де не будешь смотреть сначала первую а потом последн.. страницу =)) зачем?
Страница: [1] 2 3 4 5 6 ...
Вот так самое оптимально!
Теперь к главному, я думал думал и придумал
#!/use/bin/perl
print "Content-type:text/html\\n\\n";
open (LOG,"1.txt");
@strings=<LOG>;
$count=@strings;
close (LOG);
# Если их количество больше 10,создаём страницы.
if ($count>10) {
print "Страница:\\n";
for($i=1; $i<10; $i++) {
print "[<a href=?page=$i> $i </a>]\\n";
}
}
=) ты де не будешь смотреть сначала первую а потом последн.. страницу =)) зачем?
Страница: [1] 2 3 4 5 6 ...
Вот так самое оптимально!
Теперь к главному, я думал думал и придумал
#!/use/bin/perl
print "Content-type:text/html\\n\\n";
open (LOG,"1.txt");
@strings=<LOG>;
$count=@strings;
close (LOG);
# Если их количество больше 10,создаём страницы.
if ($count>10) {
print "Страница:\\n";
for($i=1; $i<10; $i++) {
print "[<a href=?page=$i> $i </a>]\\n";
}
}
Страницы: [1] 2