my @urls = ( .... ); # <-- Put the URLs here
foreach my $url (@urls) {
    my $response = $ua->get( $url );

    unless ($response->is_success) {
        print $response->status_line, $/;
        next;
    }

    my $google_results = $response->content;

    # Do whatever else is in parser() here
}