... --- perl output to stdout --- line3 opt=bar --- cat after --- line1 line2 --- line3 line1 line2