Select Code to Download

 my $p_token = Regexp::Token::HTML->create_token('<p name="" class="">
+');
 my $p_tag   = Regexp::Token->create($p_token);
...

 my $two_tags = q{<p name="goo" class="ber"> <p CLASS=baz name='easy'>
+ };
 is($result, $two_tags, '... and we should be able to capture token te
+xt');

  my $p_token = Regexp::Token::HTML->create_token('<p name="" class=""
+>');
  my $p_tag   = Regexp::Token->create($p_token);
...

  my $two_tags = q{<p name="goo" class="ber"> <p CLASS=baz name='easy'
+> };
  is($result, $two_tags, '... and we should be able to capture token t
+ext');