Mercurial > repo

changeset 3386:c216e32f5e2e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<ion> sed -i -re \'s/aeiouy/aeiouyAEIOUY/g\' bin/thanks bin/hi && cat bin/thanks
author HackBot
date Wed, 07 Aug 2013 18:14:34 +0000
parents 6d9cebb0eac5
children 153bbdf18dde
files bin/hi bin/thanks
diffstat 2 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/bin/hi	Wed Aug 07 18:09:59 2013 +0000
+++ b/bin/hi	Wed Aug 07 18:14:34 2013 +0000
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-$_ = (join " ", @ARGV) || `words`; s/^\s+|\s+$//g; print "Hi $_. "; if (/[aeiouy]/) { s/^[^aeiouy]*/H/; } else { s/^./H/; } print "$_.";
\ No newline at end of file
+$_ = (join " ", @ARGV) || `words`; s/^\s+|\s+$//g; print "Hi $_. "; if (/[aeiouyAEIOUY]/) { s/^[^aeiouyAEIOUY]*/H/; } else { s/^./H/; } print "$_.";
\ No newline at end of file
--- a/bin/thanks	Wed Aug 07 18:09:59 2013 +0000
+++ b/bin/thanks	Wed Aug 07 18:14:34 2013 +0000
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-$_ = (join " ", @ARGV) || `words`; s/^\s+|\s+$//g; print "Thanks, $_. "; if (/[aeiouy]/) { s/^[^aeiouy]*/Th/; } else { s/^./T/; } print "$_.";
\ No newline at end of file
+$_ = (join " ", @ARGV) || `words`; s/^\s+|\s+$//g; print "Thanks, $_. "; if (/[aeiouyAEIOUY]/) { s/^[^aeiouyAEIOUY]*/Th/; } else { s/^./T/; } print "$_.";
\ No newline at end of file