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

# (produces the same output as the first one-liner above)

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

# (produces very different output)