brian d foy

I wasn't looking forward to dealing with this XML feed because I hate anything that deals with XML. However, with Mojo's DOM stuff, I don't even have to know it's XML. Here's the interesting bits from a program that's not much larger than this snippet:

use Mojo::UserAgent;

my $ua = Mojo::UserAgent->new;

my $response = $ua->get( $feed_address )->res;

my @links = $response->

	dom( 'item' )->

	grep( sub { $_->children( 'title' ) !~ /.../ } )->

	map( sub { 

		$_->

		children('guid')->

		map( sub { $_->text } ) 

		} )->

	each

	;