out1} AAA {/print} -B- {print >> out2} BBB {/print} {print >> out2} BBB {/print} -C- {= out1} -D- {= out2} EOT; $compare = <<apply([]); Assert::equal($compare, $textResult);