Velocity Reviews - Computer Hardware Reviews

Velocity Reviews > Newsgroups > Programming > Perl > Perl Misc > Changing perl script bnews-fetch from by Carl Declerck

Reply
Thread Tools

Changing perl script bnews-fetch from by Carl Declerck

 
 
borniac
Guest
Posts: n/a
 
      04-18-2004

The problemm I have is that not al the post posted with yEnc are
retrieved with that script. Is there somebody that uses this and has
the same problem and can you help to change it.

This is the code in that perl script for look thing posted with yEnc up.

} elsif ($subject =~ /^(.*\s+yEnc)\s+"([^"]+)"\s+\((\d+)\/(\d+)\)/
|| $subject =~ /^(.*)\s+"([^"]+)"\s+yEnc\s+\((\d+)\/(\d+)\)/
|| $subject =~ /^(.*)\s+"([^"]+)"\s+\((\d+)\/(\d+)\).*yEnc/
|| $subject =~ /^(.*)\s+"([^"]+)"\s+\d+\s+yEnc\s+bytes/) {

en this I have now.

} elsif ($subject =~ /^(.*\s+yEnc)\s+"([^"]+)"\s+\((\d+)\/(\d+)\)/
|| $subject =~ /^(.*)\s+"([^"]+)"\s+yEnc\s+\((\d+)\/(\d+)\)/
|| $subject =~ /^(.*)\s+"([^"]+)"\s+\((\d+)\/(\d+)\).*yEnc/
|| $subject =~ /^(.*)\s+"([^"]+)"\s+\d+\s+yEnc\s+bytes/
|| $subject =~ /^(.*)\s+([^"]+)\s+yEnc\s+\((\d+)\/(\d+)\)/
|| $subject =~ /^(.*\yEnc)\s+"([^"]+)"\s+\((\d+)\/(\d+)\)/) {


but still doesn't see everything

Thanks
Borniac
 
Reply With Quote
 
 
 
Reply

Thread Tools

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are Off


Similar Threads
Thread Thread Starter Forum Replies Last Post
Carl Sagan's Cosmos Tim DVD Video 1 08-05-2006 07:01 AM
Long integer arrays in Python; how? /Carl Carl Python 1 11-28-2005 10:14 PM
Perl Help - Windows Perl script accessing a Unix perl Script dpackwood Perl 3 09-30-2003 02:56 AM
Attn: Carl Prothman [MVP] scriptsDel ASP .Net 3 08-13-2003 09:04 PM
Attn: Carl Prothman [MVP] ScriptsDelm ASP .Net 0 08-13-2003 08:59 PM



Advertisments