annotate bin/ord @ 3438:59820526f066

<Roujo> random="$(dd if=/dev/urandom bs=500 count=1)"; echo $random > random
author HackBot
date Mon, 19 Aug 2013 17:47:47 +0000
parents 7914d7e0b500
children c61184d37f3b
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2114
7914d7e0b500 <ais523> revert 87c64ef250a0
HackBot
parents:
diff changeset
1 #!/bin/sh
7914d7e0b500 <ais523> revert 87c64ef250a0
HackBot
parents:
diff changeset
2 echo "$@" | perl -C7 -pe 'chomp; $_ = join(" ", map { ord } split //, $_);'