Mercurial > repo
view bin/ord @ 1911:ab604b766abe
<fizzie> printf \'%s\\n\' \'#!/bin/sh\' \'echo "$@" | perl -C7 -pe \'\\\'\'chomp; $_ = join(" ", map { ord } split //, $_);\'\\\' > bin/ord
author | HackBot |
---|---|
date | Wed, 30 Jan 2013 14:12:24 +0000 |
parents | b9c4e79bfebb |
children |
line wrap: on
line source
#!/bin/sh echo "$@" | perl -C7 -pe 'chomp; $_ = join(" ", map { ord } split //, $_);'