Help for this page

Select Code to Download

Select or download this

use warnings;
use strict;
...
    my $dumpr = PPI::Dumper->new($doc, qw(whitespace 0 comments 0));
    $dumpr->print;
}

Select or download this

print "hello, world!\n"
PPI::Document
...
  PPI::Statement
    PPI::Token::Word      'print'
    PPI::Token::Quote::Double      '"goodbye, world!\n"'