http://www.perlmonks.org?node_id=1151271


in reply to Screen scraping

You can try with a simple RegExp like

my ($foo) = $html =~ /id="foo">([^<]+)</gm; print "$foo\n";