Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery
 
PerlMonks  

Re^5: PMplanet has a new home

by WizardOfUz (Friar)
on Feb 07, 2010 at 15:36 UTC ( [id://821845]=note: print w/replies, xml ) Need Help??


in reply to Re^4: PMplanet has a new home
in thread PMplanet has a new home

You probably have to check "This is a significant update" for that.

Yes, I think so too.

There is no usable XML view.

This seems to work:

#!/usr/bin/perl use strict; use warnings; open( my $fh, '<', "/home/joerg/dump.html" ) or die $!; my $html = do { local( $/ ); <$fh> }; close $fh; my @nodes; while ( $html =~ s!<tr><td><a href="\?node_id=(\d+)">([^<]+)</a></td>< +td>\d\d\d\d-\d\d-\d\d \d\d:\d\d:\d\d</td></tr>!! ) { push @nodes, [ $2, $1 ]; } print "@{$_}\n" for @nodes;

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://821845]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others examining the Monastery: (8)
As of 2024-03-28 09:16 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found