# HG changeset patch # User HackBot # Date 1351893379 0 # Node ID e6792f23192b3c903eb7c1f75e2dcbaa13e24036 # Parent 1b4c0a197a2533d26812b415a65d47ed54aa2ef6 run echo -e '#!/usr/bin/perl -w\nif (defined($_=shift)) { s/ *$//; s/ +/ @ /g; exec "bin/@", $_ . " ? wercome"; } else { exec "bin/?", "wercome"; }' > bin/wercome; chmod a+x bin/wercome diff -r 1b4c0a197a25 -r e6792f23192b bin/wercome --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/bin/wercome Fri Nov 02 21:56:19 2012 +0000 @@ -0,0 +1,2 @@ +#!/usr/bin/perl -w +if (defined($_=shift)) { s/ *$//; s/ +/ @ /g; exec "bin/@", $_ . " ? wercome"; } else { exec "bin/?", "wercome"; }