print "char#\tlength1\tlength2\n"; for (32..500) { print; print "\t"; print length chr; print "\t"; { use bytes; print length chr; no bytes; }; print "\n"; };