Yes. Quote the docs,

If the argument is a reference to a plain scalar, then this scalar is taken to be the literal document to parse.

my $stream = HTML::TokeParser->new(\$source)
  || die "Couldn't read HTML file $source";
[download]