Fayland Lam wrote:
sub test_body : Local {
my ($self, $c) = @_;
$c->res->body(*STDOUT);
print "a\n";
print "b\n";
}
Have you tried passing the glob as a reference?
$c->res->body(\*STDOUT);
It looks like that's at least part of your problem. I suspect that using
filehandles in this way is not going to work as you expect and may have
engine-specific problems, have you considered using $c->res->write as a
substitute for print?
Matt
_______________________________________________
List: [email protected]
Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst
Searchable archive: http://www.mail-archive.com/[email protected]/
Dev site: http://dev.catalyst.perl.org/
