perl -e 'print "0"x300,"\n"'|sed 's/0000000000/1111100000/g;'|sed '/\n/!G;s/\(.\)\(.*\n\)/&\2\1/;//D;s/.//'|sed -r 's/....(....)/1111\1/g' |sed '/\n/!G;s/\(.\)\(.*\n\)/&\2\1/;//D;s/.//'|sed 's/1//g' |sed -r 'x; s/.*/0/; G; x; :a; /./! bout; s/.//; H; g; s/\n.*//g; s/^9*$/0&/; s/.9*$/x&/; H; s/.*x//; y/0123456789/1234567890/; G; s/([^\n]*)\n.*\n([^\n]*)\n.*\n([^\n]*)x.*$/\3\1\n\2/; x;s/.*\n([^\n]*)\n[^\n]*/\1/; ba; :out; g;s/\n/ /;p;'
74 00000000000000000000000000000000000000000000000000000000000000000000000000
74 00000000000000000000000000000000000000000000000000000000000000000000000000
阅读(563) | 评论(0) | 转发(0) |
