for host in foo bar baz ; do
  { ssh $host echo 'I R OUT' \; echo 'I R ERROR' 1\>\&2 } > >( perl -lne "print qq{$host O: \$_}" ) 2> >( perl -lne "print qq{$host E: \$_}" )
done