perl -e "print "1_000""