PPI
PPI - Parse, Analyze and Manipulate Perl (without perl)
PDOMの要素はPPI::Elementなので、ここにあるメソッドが使える?
PPI::Dumperでdumpする
code:dump.pl
use PPI;
use PPI::Dumper;
my $document = PPI::Document->new('in.pl');
my $dumper = PPI::Dumper->new($document);
$dumper->print;
あらゆるセミコロンを取り除いてみる
code:01_strip_semicolon.pl
use strict;
use warnings;
use PPI;
my $document = PPI::Document->new('in.pl');
my $statements = $document->find('PPI::Statement');
for my $stmt (@$statements) {
$stmt->last_element->remove if $stmt->last_element eq ';';
}
$document->save('out.pl');
メソッド呼び出し一覧を列挙する