cat /tmp/file | perl -e 'print "XXX\n" ;print <>; print "XXX"' [download]
In reply to pipe output to perl by spmlingam