print $OUT $res, "\n" unless $@;