# tee input.txt</dev/ttyS0 | perl-prog.pl | tee output.txt >/dev/ttyS0