#! perl -sw use strict; use LWP::Simple; my $html = get("http://pvpgnservers.ath.cx"); #my $html = do{local $/; <>; }; my @stuff = $html =~ m!