$ os_prog_1 | perl_prog | os_prog_2

##</code><code>##

$ ls -l | perl -e 'while (<>) { print }' | wc -l
    821

##</code><code>##

$ ls -l | wc -l
    821