Help for this page

Select Code to Download

Select or download this

$VAR1 = { 'type' => 'S', # or T|E|C|D|PI
          'tag' => 'html',
...
          'attrseq' => [],
          'text' => '<HTML>',
        };

Select or download this

my $token = $parser->get_hashtoken();
if($token->{type} eq 'S') {
...
        print Data::Dumper::DumperX($token);
    }
}