5.8系のperlでは、こんなことができるっぽい。 my $output = ''; open (OUT, ">" , \$output); print OUT "test\n"; close(OUT); print $output; Catalystはこの構文を使っているので、5.6系のperlではtestが通らない。Engine/Test.pmをnew_tmpfileとかseek…