$ perl -e'print "a\n";' -e'print "b\n";' a b