perl -e 'printf("%o", ord) foreach ( split //, shift )'

##</code><code>##

 perl -e 'printf("%x", ord) foreach ( split //, shift )'