# find all the URLs from the page contents, rejecting any from bianca
@data = extract_multiple( $response->content, 
                [ sub {extract_tagged($_[0], 
                '<a href="http://', '</a>', 
                undef, 
                {reject => ['bianca.com']} ) } ], 
                                    undef, 1);

# loop thru and strip the URL to it's bare address, this is
# what's needed to insert into the database
for (my $i=0; $i<=$#data; $i++) {
    my @temp = extract_tagged($data[$i], '<a href="http://', '">', und
+ef, undef);
    $data[$i] = $temp[4];
}