|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Mr.Young 2:5020/400 27 Dec 2000 06:37:09 To : All Subject : Помогите с Net::NNTP -------------------------------------------------------------------------------- Здравствуйте!!!! Своял скрипт, запускаю perl имя_скрипта.pl. Работает отлично. Пытаюсь вставить через SSI, Apache кричит, что неможет породить дочерний процесс. Подскажите где грабли? #!usr/local/bin/perl print "Content-type: text/html\n\n"; use Net::NNTP; $server = Net::NNTP->new("news.cis.ru"); ($narticles, $first, $last, $name) = $server->group("microsoft.public.vb.winapi"); $headers = $server->head($first); $bodytext = $server->body($first); $article = $server->article($first); print "Всего статеий: $narticles\n"; print "? Первый : $first\n"; print "? Последний : $last\n"; print "Имя конфы : $name\n"; print "============================\n"; print "Сообщение : "; $last_idx = $#$bodytext; for ($i=0; $i < $last_idx; $i++){ print "$bodytext->[$i]"; } print "============================\n"; unless ($server->postok()) { print "Отправка сообщений запещена!!!\n"; } else { print "Отправка сообщений разрешина!!!\n"; } #$server->post([@lines]) # or die "Post Error: $!\n"; $server->quit; ________________________________ С вами был Mr.Young mr_young@vbstep.bos.ru Visual Basic - Step by Step http://vbstep.by.ru ICQ: 60045973 --- ifmail v.2.15dev5 * Origin: Cardinal Internet Services ISP, Novosibirsk, RU (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/6403f3af5082.html, оценка из 5, голосов 10
|