annotate bin/@ @ 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 1e110f9d6e37
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
e037173e0012 Initial import.
HackBot
parents:
diff changeset
1 #!/usr/bin/perl -w
4286
1e110f9d6e37 <oerjan> revert
HackBot
parents: 4285
diff changeset
2 $_ = join " ", @ARGV; if (s/^([^ ]*) +([^ ]*) +//) { print "$1: "; exec $2, $_; }