my ($foo) = $html =~ /id="foo">([^<]+)