Mercurial > repo
changeset 5956:685e004a3372
<fizzie> ` sed -i -e \'s/perl/perl -CSDA/\' bin/thanks
author | HackBot |
---|---|
date | Sat, 05 Sep 2015 16:56:23 +0000 |
parents | de7749cfb1d9 |
children | f794a3c35240 |
files | bin/thanks |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/bin/thanks Thu Sep 03 08:03:54 2015 +0000 +++ b/bin/thanks Sat Sep 05 16:56:23 2015 +0000 @@ -1,2 +1,2 @@ -#!/usr/bin/perl +#!/usr/bin/perl -CSDA $_ = (join " ", @ARGV) || `words`; s/^\s+|\s+$//g; print "Thanks, $_. "; if (/[aeiouyAEIOUY]/) { s/^[^aeiouyAEIOUY]*/Th/; } else { s/^./T/; } print "$_."; \ No newline at end of file