perl program.pl | tee -a output.txt