perl -e 'undef $/; print join(",", map {ord} split //, <>)'

##</code><code>##

perl -e 'undef $/; print join("", map {chr} split /,/, <>)'