perl -we 'print "000"|"1"' 100