view bin/ord @ 3381:6c1921ed1fd2

<Jafet> echo $\'main() { int x; x = 3; int y; return x + y; }\\n\' > a.c && gcc a.c
author HackBot
date Wed, 07 Aug 2013 00:32:29 +0000
parents 7914d7e0b500
children c61184d37f3b
line wrap: on
line source

#!/bin/sh
echo "$@" | perl -C7 -pe 'chomp; $_ = join(" ", map { ord } split //, $_);'