./perlscript < /tmp/log-named-pipe