use LWP::Simple;
my $content = get($url);

my @emails = $content =~ m//g;