system q/xterm -e perl -le 'print "line $_" for 1..20; <>'/;