The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
[% USE TwoStage = TwoStage;
   # do not purge cache in between!
   BLOCK test_template_a;
	"bla\n";	
   END;
   BLOCK test_template_b;
	"blub\n";	
   END;
#   USE Dumper;
#   Dumper.dump( template );
#   Dumper.dump( component );
   TwoStage.process( 'template' => 'test_template_a' ); 
   TwoStage.process( 'template' => 'test_template_b' );
#   TwoStage.params.item("keys").values.join("\n");
%]