Perl newsfetcher

• Create /usr/lib/news/active as a bunch of newsgroup names, 1 per line (add new groups just by adding the name on a new line and getactive...only groups without numbers are picked up)
• run getactive to create the active2 file and newsgroup directories (in /var/spool/news)
• merely fetchnews every time you feel the need
• expire to, er, expire

Notes

• getactive and fetchnews will need the server name at the top adjusting
• expire - change the +7 to +[number of days you like to expire in]
• This was written in the bad old days when I found using open2 and telnet simpler than proper socket programming

This is totally unsupported etc, etc. I only wrote it avoid using innd. If you're really desperate to comment/suggest, mail simonweb@ruffles.org.uk

Simon, 3/1997