Select Code to Download

sub parsegooglealertbody {
    my ($html,$results) = @_;
    my $tree = HTML::TreeBuilder->new_from_content($html);
...
    }
    return $results;
}

use Storable qw( retrieve );
use HTML::Element;
use Data::Dumper;
$anchors = retrieve('anchors.sto');