ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Comoderator of RU.CGI.PERL           2:5020/400     11 Mar 2001  12:35:18
 To : legko@i.com.ua
 Subject : Re: CGI&NNTP???
 -------------------------------------------------------------------------------- 
 

 Здравствуй, Oleg V. Kogut.
 
 В твоём письме от Sat, 10 Mar 2001 05:22:44 +0000 (UTC) написано:
 
 licu> Привет Всей ЧестнОй Компании!
 licu>  Возможно этот вопрос уже обсуждался, а возможно он для Вас покажется
 licu>  примитивным. В любом случае прошу прощения, т.к. я только подписАлся
 licu>  на конфу и не являюсь специалистом в области CGI/Perl. Так, знаете - ли,
 licu>  любитель.
 licu>  Есть ли такой CGI скрипт?
 licu>  Человек на моей доске объявлений помещает свою информацию. Эта информация
 licu>  остается
 licu>  у меня на сервере на доске объявлений. (Это уже работает).
 licu>  Есть ли возможность найти/написать такой скрипт, что бы одновременно эта
 licu>  информация (Subject, Body, from, line и т.д.) дублировылась в
 licu>  NEWS-конференции. Я имею
 licu>  ввиду службы новостей NNTP, порт 119?
 
 licu>  Есть у меня такая конструкция:
 licu>  #!/usr/bin/perl -w
 licu>  print "Content-type: text/plain";
 licu>  $group = 'use.conference.net';
 licu>  $from = 'aaa@test.mail.com';
 licu>  use Socket;
 licu>  use CGI qw(:standard);
 licu>  $namesev='news.server.com';
 licu>  $port=119;
 licu>  socket NEWS, PF_INET, SOCK_STREAM, 0;
 licu>  if (!connect NEWS, sockaddr_in ($port, inet_aton($namesev))) {
 licu>  print "Port $port not connected is $namesev!";
 licu>  exit; }
 
 licu>  select NEWS;
 licu>  $|=1;
 
 <NEWS>>;
 
 licu>  select STDOUT;
 
 licu>  print NEWS "GROUP $group/n";
 licu>  print NEWS "From: $from/n";
 licu>  print NEWS "Newsgroups: $group/n";
 licu>  print NEWS "Subject: This is a suject./n";
 licu>  print NEWS "Date: Thu, 8 Mar 2001 10:03:44 +0200/n";
 licu>  print NEWS "Lines: 7/n";
 licu>  print NEWS " This is a body./n";
 licu>  print NEWS "QUIT/n";
 
 <NEWS>>;
 
 licu>  close NEWS;
 
 licu>  Соединение с сервером устанавливается, но PRINTы
 licu>  посылают инфу в "пустоту".
 
 licu>  Hе знает ли кто, где можно найти такой скрипт (нормально работающий)
 licu>  или описАние nntp - диалога между сервером и клиентом (желательно на
 licu>  русском,
 licu>  т.к. с английским проблемы :-((.
 
 licu>  Ответ, пожалуйста, продублируйте мылом, т.к. я не часто бываю в Инете.
 licu>  Заранее благодарен всем, кто откликниться. Спасибо.
 
 0. Оффтопик. В RU.PERL.
 
 1. use Net::NNTP, и ваши волосы будут.
 
 -- 
 FIDO: Artem Chuprina, 2:5020/371.32, comoderator of RU.CGI.PERL
 Internet: Artem Chuprina <cmrcp@ran.pp.ru>, comoderator of fido7.ru.cgi.perl
 --- ifmail v.2.15dev5
  * Origin: NTV Internet (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    CGI&NNTP???   Oleg V. Kogut   10 Mar 2001 09:22:44   Re: CGI&NNTP???   Comoderator of RU.CGI.PERL   11 Mar 2001 12:35:18