Dear all
Pls help to see for my 1st testing nntp perl scripts. I would like to have a
perl scripts which can be posting the news automated.
Does any 1 have an ideas ?
million thx.


#!/usr/local/bin/perl -Tw

use strict;

use Net::NNTP;
use Mail::Header;

my $nntpserver = 'xxx.com';
$nntp = Net::NNTP->new($nntpserver);
$nntp->group([$group]);
$nntp->post([$mesg]);
$nntp->data;
$nntp->datasend("this the test");

$nntp->dataend();
$nntp->quit();


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to