perl -e' print "first line ", <