| Subject: | 441 Article has no body -- just headers |
libnet-1.19\Net\NNTP.pm
perl -v
This is perl, v5.8.0 built for i386-freebsd
FreeBSD newred.gradwell.net 4.8-STABLE FreeBSD 4.8-STABLE #1: Tue Jun 3 10:03:55 BST 2003
I have a problem posting an article
The article
Return-Path: <news@teal.gradwell.net>
From: {R} <nospam@spam.nium.org>
Newsgroups: uk.legal.moderated
Subject: Test Post, Please post it
X-Original-Date: Thu, 05 Jan 2006 17:13:23 +0000
Date: Thu, 5 Jan 2006 17:25:05 +0000
Organization: .
Reply-To: {newsnospam}@semolina.org
Message-ID: <ctkqr15ukc3pjet7m8ie0uiglsk9g3tvnb@4ax.com>
X-Newsreader: Forte Agent 2.0/32.652
X-No-Archive: yes
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
NNTP-Posting-Host: 84.51.147.22
X-Original-Trace: 1136481165 news.gradwell.net 87296 corixa/84.51.147.22:38681
X-Ulm-Charter: http://www.usenet.org.uk/uk.legal.moderated.html
X-Ulm-Info-1: Submissions uk-legal-moderated@usenet.org.uk
X-Ulm-Info-2: Technical complaints only sysadmin@moderation.org.uk
X-Ulm-Info-3: Human moderators uk-legal-moderated-request@usenet.org.uk
X-Comment: The moderators express no opinion about this article.
X-Robomod: {R}UUM ©2003 Richard Ashton richard@moderation.org.uk
X-Robomod-Trace: 7625020060105172857SY1136481848.34632.newred.gradwell.net manual
Approved: uk-legal-moderated moderators <uk-legal-moderated@moderation.org.uk>
X-Auth: PGPMoose V1.1 PGP uk.legal.moderated
iQBVAwUBQ71XWcAEwBGxn+6BAQHKKwH/R9osIDbVbHYFwa/CPrsCUBAlXaKOSKnx
PlHFoykBTh3fw7pv9sm4lQOOhl7kax2NP5DSLNk0T2E1480gtjjshQ==
=XKYN
This is a test post
I think something is badly wrong somewhere but currently I have no idea
where
Please post this
{R}
===Ends==
The code
#/usr/bin/perl
BEGIN {use lib '/home/corixa/moose/lib';}
use Net::NNTP;
my $out_file = '/home/corixa/moose/pgp-76260'.'.sig';
$nntp = Net::NNTP->new("news.gradwell.net",Debug=>1);
$nntp->authinfo(corixa, fidelity);
$nntp->post($out_file);
$nntp->quit;
close (INFILE);
The Debug output
[corixa@newred moose]$ perl -d tempnntp.pl
Loading DB routines from perl5db.pl version 1.19
Editor support available.
Enter h or `h h' for help, or `man perldebug' for more help.
main::(tempnntp.pl:19): my $out_file = '/home/corixa/moose/pgp-76260'.'.sig';
DB<1> n
main::(tempnntp.pl:38): $nntp = Net::NNTP->new("news.gradwell.net",Debug=>1);
DB<1> n
Net::NNTP>>> Net::NNTP(2.22)
Net::NNTP>>> Net::Cmd(2.24)
Net::NNTP>>> Exporter(5.566)
Net::NNTP>>> IO::Socket::INET(1.26)
Net::NNTP>>> IO::Socket(1.27)
Net::NNTP>>> IO::Handle(1.21)
Net::NNTP=GLOB(0x84a15f4)<<< 200 news.gradwell.net NNRP Service Ready - newsmaster@gradwell.net (posting ok).
Net::NNTP=GLOB(0x84a15f4)>>> MODE READER
Net::NNTP=GLOB(0x84a15f4)<<< 480 Authentication required for command
main::(tempnntp.pl:39): $nntp->authinfo(corixa, fidelity);
DB<1> n
Net::NNTP=GLOB(0x84a15f4)>>> AUTHINFO USER corixa
Net::NNTP=GLOB(0x84a15f4)<<< 381 PASS required
Net::NNTP=GLOB(0x84a15f4)>>> AUTHINFO PASS ....
Net::NNTP=GLOB(0x84a15f4)<<< 281 Ok
main::(tempnntp.pl:40): $nntp->post($out_file);
DB<1> n
Net::NNTP=GLOB(0x84a15f4)>>> POST
Net::NNTP=GLOB(0x84a15f4)<<< 340 340 <43be8053$0$87297$bed64819@news.gradwell.net> (desired)
Net::NNTP=GLOB(0x84a15f4)>>> /home/corixa/moose/pgp-76260.sig
Net::NNTP=GLOB(0x84a15f4)>>> .
Net::NNTP=GLOB(0x84a15f4)<<< 441 Article has no body -- just headers
main::(tempnntp.pl:42): $nntp->quit;
DB<1> q
Net::NNTP=GLOB(0x84a15f4)>>> QUIT
Net::NNTP=GLOB(0x84a15f4)<<< 205 Transferred 114 bytes in 0 articles, 0 groups. Disconnecting.
I cannot see any reason why the article is "broken" :(
{R}