NAME
PPIx::Refactor - Hooks for refactoring perl via PPI
SYNOPSIS
use PPIx::Refactor;
my $p = PPIx::Refactor->new(file => '/path/to/perl/code/file.pl',
ppi_find => \&found,
[ writer => \&found ]);
my $finds = $p->finds; # for examining them interactively
$p->rewrite; # rewrites the file in place. You are using version control yes?SUMMARY
This is a really simple module to make rewriting perl code via PPI debugger friendly and easy. See the test in t/refactor.t of this distribution for a working example. Pretty much all the real work happens in the coderef you set up in $p->ppi_find and $p->writer.
NOTE PPI::Cache is used to store a cached representation of the source parse in /tmp/pppix-refactor_cache
RATIONALE
Rewriting code via ppi is a fiddly pain. PPIx::Refactor provides a minimal interface so you can concentrate on the fiddlyness and minimise the pain.
TODO
Would be nice to specify a rewriter via roles, and it would be nice to have $self in $p->ppi_find. On the other hand rewrite/refactoring code like this can either be simple throwaways, or really really complicated. This code is so far optimised for the throwaway case.
ATTRIBUTES
file
required string that coerces into a Path::Tiny
doc
lazily built PPI::Document
ppi_find
required coderef with which to find the elements of interest
writer
optional coderef with which to rewrite the code.
finds
lazy built arrayref of all the elements of interest found
METHODS
$self->rewrite
Worker sub that rewrites the code. Operates on what it finds in <$self-finds>>
$self->dump($elem, $whitespace);
For debugging. Prints a dump of the passed in element. If $whitespace is true it will include whitespace in the dump. Defaults to false.
AUTHOR
Kieren Diment, <zarquon at cpan.org>
BUGS
Please report any bugs or feature requests via github: https://github.com/singingfish/PPIx-Refactor/issues.
SUPPORT
Jump on to #web-simple on irc.perl.org
ACKNOWLEDGEMENTS
LICENSE AND COPYRIGHT
Copyright 2015 Kieren Diment.
This program is free software; you can redistribute it and/or modify it under the same terms as perl itself.