Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|

30.12.2009, 00:06
|
|
Новичок
Регистрация: 17.08.2009
Сообщений: 21
Провел на форуме: 62180
Репутация:
0
|
|
Здравствуйте,помогите пожалуйста с постраничной навигацией)значит так.есть таблица VIDEO в ней есть поле VIDEO так вот чтобы получить данные из поля я использую скрипт ("
Код:
my $sth2 = $dbh->prepare(qq{SELECT video_title FROM video});
$sth2->execute();
while (my ($title) =
$sth2->fetchrow_array())
{
print "<p>
<button onclick='showPopWin('http://10.33.195.248//ajax/index.html', 400, 200, null);>$title</button></p>";
}
print "</TABLE><div>";
$sth2->finish();
")
так вот проблема в том что всё выводится на одну страницу..так вот вопрос как вывести эти данные по странично к примеру по 20 значений на страницу?
Последний раз редактировалось anubis666; 30.12.2009 в 00:31..
|
|
|

31.12.2009, 01:11
|
|
Познающий
Регистрация: 11.09.2006
Сообщений: 59
Провел на форуме: 70702
Репутация:
52
|
|
anubis666 как то так:
Код:
anubis666
my ($c, $k) = (0,0);
my %html;
..
..
while..
{
$c++;
if( $c == 20 )
{
$k++;
$c = 0;
}
push @{$html{$k}}, "<p><button onclick='showPopWin('http://10.33.195.248//ajax/index.html', 400, 200, null);>$title</button></p>";
}
..
..
|
|
|

31.12.2009, 01:14
|
|
Постоянный
Регистрация: 17.09.2008
Сообщений: 562
Провел на форуме: 6962560
Репутация:
536
|
|
Здрасте... Туплю второй час...
Шлю запрос на сайт через сокет, считываю ответ:
Получаю в $str примерно следующее:
PHP код:
HTTP/1.1 301 Moved Permanently
Server: nginx
Date: Wed, 30 Dec 2009 20:54:08 GMT
Content-Type: text/html; charset=iso-8859-1
Connection: close
Content-Length: 294
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 2.0//EN">
<html><head>
<title></title>
</head><body>
бла-бла-бла....
</body></html>
Так вот, нужно разбить содержимое $str на 2 части заголовки ($head) и контент ($content)... Вот с этим и запарка...
Пробую сразу при чтении отделять заголовки так:
PHP код:
while ($s = <SOCK>)
{
$str .= $s;
last if (условие выхода из цикла);
}
по сути, условие выхода из цикла тут - пустая строка, которая как раз отделяет заголовки от контента, но не получается, в результат сохраняется только первоя строка заголовков, как только не изворачивался...
Помогите.. Цель: закинуть заголовки и контент в разные переменные... 
|
|
|

31.12.2009, 01:20
|
|
ветеран
Регистрация: 22.06.2004
Сообщений: 2,128
Провел на форуме: 5355463
Репутация:
2258
|
|
ну можно так
Код:
$s =~ m%<%s;
print $';
попробуй
__________________
Моня тот еще зверюга,
Свиду тихий внутри - ****,
Без обид,реальный мэн,
Просто рифмы нет совсем.
С ним шутить *****то очень,
В ирце вместе с ним хохочем (c) m0Hze
|
|
|

31.12.2009, 01:32
|
|
Reservists Of Antichat - Level 6
Регистрация: 23.08.2007
Сообщений: 1,237
Провел на форуме: 18127311
Репутация:
1676
|
|
Мб
last if $s eq "\r\n";
|
|
|

31.12.2009, 01:43
|
|
Постоянный
Регистрация: 17.09.2008
Сообщений: 562
Провел на форуме: 6962560
Репутация:
536
|
|
m0nzt3r, так он закинул в $head все заголовки + ещё одну строку контента...
Kaimi, то что нужно.. Рабтает...
Спасибо всем...
ЗЫ: я пытался так last if ($s == "\r\n"); 
|
|
|

31.12.2009, 07:45
|
|
Познавший АНТИЧАТ
Регистрация: 27.04.2007
Сообщений: 1,044
Провел на форуме: 3660186
Репутация:
905
|
|
гг, == только для сравнения чисел, для строк юзается eq
ЗЫ. Скобки в структуре last if условие; и подобных можно опустить
|
|
|

31.12.2009, 21:37
|
|
Познающий
Регистрация: 22.11.2009
Сообщений: 48
Провел на форуме: 638753
Репутация:
27
|
|
Как проверить наличия файла .php на сервере ?
допустим если присутсвеует то yes , если нету то no...
Последний раз редактировалось [none]; 31.12.2009 в 23:01..
|
|
|

01.01.2010, 11:32
|
|
Познавший АНТИЧАТ
Регистрация: 27.04.2007
Сообщений: 1,044
Провел на форуме: 3660186
Репутация:
905
|
|
HEAD- или GET-запрос на сервер. Если не юзается mod_rewrite, сервер вернет 200 OK в случае существования файла
|
|
|

01.01.2010, 14:57
|
|
Познающий
Регистрация: 22.11.2009
Сообщений: 48
Провел на форуме: 638753
Репутация:
27
|
|
в голову тока такое лезет
use LWP::Simple;
use LWP::UserAgent;
my $url = 'http://site.ru/ololo.php';
my $content = get $url;
die "нету $url";
но это не годится....
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|