$p = HTML::TokeParser->new( \(get $url) );