require Clone::PP;
  push @HTML::TokeParser::Simple::ISA, 'Clone::PP';
  
  # deep copy
  my $p_blah = $p->clone();