225 |
$log->debug(">>> ", $Element->snext_sibling); |
$log->debug(">>> ", $Element->snext_sibling); |
226 |
}); |
}); |
227 |
|
|
228 |
my $source = $Document->serialize; |
my $normalize_source = $Document->serialize; |
229 |
$log->debug("create: ", dump($self->{_lookup_create}) ); |
$log->debug("create: ", dump($self->{_lookup_create}) ); |
230 |
$log->debug("normalize: $source"); |
$log->debug("normalize: $normalize_source"); |
231 |
|
|
232 |
$self->{_normalize_source}->{$database}->{$input} = $source; |
$self->{_normalize_source}->{$database}->{$input} = $normalize_source; |
233 |
|
|
234 |
if ($self->{debug}) { |
if ($self->{debug}) { |
235 |
my $Dumper = PPI::Dumper->new( $Document ); |
my $Dumper = PPI::Dumper->new( $Document ); |