+ if ( -e 'out/debug' ) { # FIXME flag?
+ my $out;
+ foreach my $i ( @inputs ) {
+ warn dump( $i );
+ next unless defined $i->{normalize};
+ warn dump( $i->{normalize} );
+ foreach my $normalize ( @{ $i->{normalize} } ) {
+ my $path = $normalize->{path};
+ $out .= qq/\n##\n## $path\n##\n\n/;
+ $out .= read_file( $path );
+ }
+ }
+ my $all = "out/debug/all-normalize.pl";
+ write_file( $all, $out );
+ warn "### all normalize for this input saved to: $all";
+ };
+