So I wrote something on my scratchpad and sent to Spenser, and he recommends posting it here for others to see. It takes a little bit of time fetching and parsing the data, but it does the trick, anyway :)

#!/usr/local/bin/perl
use strict;
use XML::LibXML;
use CGI;

use constant XML_SOURCE => 'http://www.perlmonks.org/index.pl?node_id=
+30175';

sub main
{
    my $parser = XML::LibXML->new();
    my $dom    = eval{ $parser->parse_file( XML_SOURCE ) };
    die if $@;

    my $q = CGI->new();
    print
        $q->header( -type => 'text/html' ),
        $q->start_html( -title => 'New Perl Questions' ),
        $q->b( "New Perl Questions" ),
        $q->br,
        $q->hr;

    foreach my $node ( $dom->findnodes( '/NEWESTNODES/NODE[ @nodetype 
+= "perlquestion" ]' ) ) {
        print $q->a(
            { -href => sprintf(
                'http://www.perlmonks.org/index.pl?node_id=%d',
                $node->findvalue( '@node_id' )
            ) },
            $node->textContent()
        ),
        $q->br;
    }

    print $q->end_html();
}

main();
[download]