use CGI; print "Content-type: text/plain\n\n"; print join " ", unpack 'C*', $CGI::CRLF; #### 13 10