Select Code to Download

perl -e '$_ = join "", map { chr() } 0..255; s/\W//g; print' | od -txC
+ -a

0000000    30  31  32  33  34  35  36  37  38  39  41  42  43  44  45 
+ 46
           0   1   2   3   4   5   6   7   8   9   A   B   C   D   E  
+ F
...
0000060    6c  6d  6e  6f  70  71  72  73  74  75  76  77  78  79  7a 
+   
           l   m   n   o   p   q   r   s   t   u   v   w   x   y   z  
+  
0000077

perl -CS -e '$_ = join "", map { chr() } 0..255; s/\W//g; print $_,$/'

...
perl -CS -e '$_ = join "", map { chr() } 0..256; s/\W//g; print $_,$/'

# (produces very different output)