PPIx::EditorTools::IntroduceTemporaryVariable - Introduces a temporary variable using PPI
my $munged = PPIx::EditorTools::IntroduceTemporaryVariable->new->introduce( code => "use strict; BEGIN { $^W = 1; }\n\tmy $x = ( 1 + 10 / 12 ) * 2;\n\tmy $y = ( 3 + 10 / 12 ) * 2;\n", start_location => [ 2, 19 ], end_location => [ 2, 25 ], varname => '$foo', ); my $modified_code_as_string = $munged->code; my $location_of_new_var_declaration = $munged->element->location;
Given a region of code within a statement, replaces all occurrences of that code with a temporary variable. Declares and initializes the temporary variable right above the statement that included the selected expression.
Constructor. Generally shouldn't be called with any arguments.
Accepts either a PPI::Document to process or a string containing the code (which will be converted into a PPI::Document) to process.
PPI::Document
Given the region of code specified by start_location and end_location, replaces that code with a temporary variable with the name given in varname (defaults to tmp). Declares and initializes the temporary variable right above the statement that included the selected expression.
tmp
Returns a PPIx::EditorTools::ReturnObject with the modified code as a string available via the code accessor (or as a PPI::Document via the ppi accessor), and the PPI::Token where the new variable is declared available via the element accessor.
PPIx::EditorTools::ReturnObject
code
ppi
PPI::Token
element
Croaks with a "no token" exception if no token is found at the location. Croaks with a "no statement" exception if unable to find the statement.
This class inherits from PPIx::EditorTools. Also see App::EditorTools, Padre, and PPI.
PPIx::EditorTools
Steffen Mueller smueller@cpan.org Mark Grimes mgrimes@cpan.org
smueller@cpan.org
mgrimes@cpan.org
Copyright 2008-2009 The Padre development team as listed in Padre.pm.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl 5 itself.
To install PPIx::EditorTools, copy and paste the appropriate command in to your terminal.
cpanm
cpanm PPIx::EditorTools
CPAN shell
perl -MCPAN -e shell install PPIx::EditorTools
For more information on module installation, please visit the detailed CPAN module installation guide.