$data =~s/([^\n]{16})/ch($1)/ge;