Select Code to Download

print chr(200);
print chr(1000);

print chr(200) . chr(1000);

>perl -we"no warnings qw( utf8 ); print chr(200); print chr(1000);" | 
+perl -nE"say length;"
3

>perl -we"no warnings qw( utf8 ); print chr(200) . chr(1000);" | perl 
+-nE"say length;"
4