my @urls = (
    "http://localhost:8080/html.htm",
);

for my $url (@urls) {
    my $html = get($url) 
        or die "Couldn't fetch page.";

    $html =~ ...
    ...
}