use strict;
use warnings;
use WWW::Mechanize;

my $mech = WWW::Mechanize->new;

$mech->get( 'http://bleep.com/index.php' );

printf "%s\n", $_->URI for $mech->links;