in reply to HTML Parser

Yes 
use HTML::TokeParser::Simple;

my $p = HTML::TokeParser::Simple->new(\*DATA);
while(my $t = $p->get_token) {
   print $p->get_token()->return_text and last
     if $t->is_start_tag('title');
}

__DATA__

<html>
<head>
<title>this is a test</title>
</head>
</html>

[download]
Which outputs this is a test. See the HTML::TokeParser::Simple docs for more info (caveat: with the latest version of H::T::S the return_text method is better known as as_is).
HTH

_________
broquaint

In Section Seekers of Perl Wisdom