perl -e 'print "XP does not mean anything.\n" while 1'