in reply to STDOUT to multiple files

Not a perl answer, but maybe it helps?

If you run the program on some flavour of UNIX, there should be a tee command which should do exactly what you requested:

/path/to/my/command -o ptions | tee /path/to/logfile

s$$([},&%#}/&/]+}%&{})*;#$&&s&&$^X.($'^"%]=\&(|?*{%
+.+=%;.#_}\&"^"-+%*).}%:##%}={~=~:.")&e&&s""`$''`"e

Replies are listed 'Best First'.
A reply falls below the community's threshold of quality. You may see it by logging in.