man PPI::Document::Normalized () - A normalized Perl Document
NAME
PPI::Document::Normalized - A normalized Perl Document
DESCRIPTION
A Normalized Document object is the result of the normalization process contained in the PPI::Normal class. See its documentation for more information.
The object contains a version stamp and function list for the version of PPI::Normal used to create it, and a processed and delinked PPI::Document object.
Typically, the Document object will have been mangled by the normalization process in a way that would make it fatal to try to actually DO anything with it.
Put simply, never use the Document object. YOU HAVE BEEN WARNED!
The object is designed the way it is to provide a bias towards false negatives. A comparison between to ::Normalized object will only return true if they were produced by the same version of PPI::Normal, with the same set of normalization functions (in the same order).
You may get false negatives if you are caching objects across an upgrade.
Please note that this is done for security purposes, as there are many cases in which low layer normalization is likely to be done as part of a code security process, and false positives could be highly dangerous.
METHODS
new
The CWnew method is intended for use only by the PPI::Normal class, and to get ::Normalized objects, you are highly recommended to use either that module, or the CWnormalized method of the PPI::Document object itself.
version
The CWversion accessor returns the PPI::Normal version used to create the object.
functions
The CWfunctions accessor returns a reference to an array of the normalization functions (in order) that were called when creating the object. The CWequal method is the primary comparison method, taking another PPI::Document::Normalized object, and checking for equivalence to it.
The CW== operator is also overload to this method, so that you can do something like the following:
my $first = PPI::Document->load('first.pl');
my $second = PPI::Document->load('second.pl');
if ( $first->normalized == $second->normalized ) {
print "The two documents are equivalent";
}
Returns true if the normalized documents are equivalent, false if not, or CWundef if there is an error.
SUPPORT
See the support section in the main module
AUTHOR
Adam Kennedy (Maintainer), <http://ali.as/>, cpan@ali.as
COPYRIGHT
Copyright (c) 2005 Adam Kennedy. All rights reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
The full text of the license can be found in the LICENSE file included with this module.