view bin/ord @ 4294:1f6f62cf90e3

<shachaf> echo >bin/rnooodl \'perl -pe \'\\\'\'s/[Nn]ooodl/"\\1@{[o x(3+rand 7)]}dl"/ge\'\\\'
author HackBot
date Tue, 14 Jan 2014 01:17:23 +0000
parents c61184d37f3b
children 02775a0b8839
line wrap: on
line source

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