Help for this page
tr ( -/:-@[-`{-}) [`-{/" \-] ;
DB<11> print chr($_),"" for ord('`')..ord('{') `abcdefghijklmnopqrstuvwxyz{
DB<16> print chr($_) for map {ord($_->[0])..ord($_->[1])} [' ','/'], + [qw(: @)],[qw([ `)],[qw({ })] !"#$%&'()*+,-./:;<=>?@[\]^_`{|}