in reply to Creating a perlmonks node grabber

Ok, here's my code for this. This displays the newest 10 nodes. From here it's easy to cut and paste this into my Slashdot Headline Grabber or create a Perl/Tk,Perl/Gtk or Perl/Qt app to do the same thing.
use LWP::Simple; my $slurp = get("http://www.perlmonks.org/index.pl?node=Newest\%20Node +s"); push @nodes, $1 while $slurp =~ /\?node_id=(\d+)\&/g; print join("\n", (reverse sort {$a <=> $b} @nodes)[0..9]);

Replies are listed 'Best First'.
RE: RE: Creating a perlmonks node grabber
by httptech (Chaplain) on May 04, 2000 at 17:30 UTC
    This seemed more appropriate to the snippets section, so I added it there as well.