#23456789_123456789_123456789_1234
perl -ple'$_ x=1==unpack"%6c*",uc'
perl -pe'$_ x=11==unpack"%6c*",uc'