use IPC::Open3; our $rotatelogs_bin = ''; our $rotate_size = '10M'; # must end with M, see rotatelogs docs our $logdir = '/home/ahammond/logtest/log'; our $pg_bin = '/home/ahammond/logtest/belcher.pl'; our $pg_args = ''; # start by opening stdout and stderr loggers open (STDOUTLOG, "| $rotatelogs_bin $logdir/stdout.log $rotate_size") or die "Can't open stdoutlog: $!\n"; open (STDERRLOG, "| $rotatelogs_bin $logdir/stderr.log $rotate_size") or die "Can't open stderrlog: $!\n"; # filehandle manipulation here? our $pid = open3 (\*STDIN, \*STDOUTLOG, \*STDERRLOG, $pg_bin, $pg_args);