diff options
author | Mattias Andrée <maandree@operamail.com> | 2012-08-19 19:52:39 +0200 |
---|---|---|
committer | Mattias Andrée <maandree@operamail.com> | 2012-08-19 19:52:39 +0200 |
commit | 4774e74ba0af1d1716b832c31e3bf31aed305e4b (patch) | |
tree | a2d2b4fb14895486c04262da022d4bdea7acd7d6 /pq4ps-list.pl | |
parent | f763439803559312cd57835d5fc714a963b1788a (diff) | |
parent | 64b726770a07a0e04bcec3cf8ab23af4bcc2332f (diff) | |
download | ponysay-4774e74ba0af1d1716b832c31e3bf31aed305e4b.tar.gz ponysay-4774e74ba0af1d1716b832c31e3bf31aed305e4b.tar.bz2 ponysay-4774e74ba0af1d1716b832c31e3bf31aed305e4b.zip |
Merge branch 'master' into develop
Diffstat (limited to 'pq4ps-list.pl')
-rwxr-xr-x | pq4ps-list.pl | 24 |
1 files changed, 0 insertions, 24 deletions
diff --git a/pq4ps-list.pl b/pq4ps-list.pl deleted file mode 100755 index d4517c5..0000000 --- a/pq4ps-list.pl +++ /dev/null @@ -1,24 +0,0 @@ -#!/usr/bin/perl - -print "(sed"; - -foreach $arg (@ARGV) -{ - print " -e 's/ $arg / \e[1m$arg\e[21m /g'"; - print " -e 's/ $arg)/ \e[1m$arg\e[21m)/g'"; - print " -e 's/($arg /(\e[1m$arg\e[21m /g'"; - print " -e 's/($arg)/(\e[1m$arg\e[21m)/g'"; - print " -e 's/ $arg\$/ \e[1m$arg\e[21m/g'"; - print " -e 's/^$arg /\e[1m$arg\e[21m /g'"; - print " -e 's/^$arg\$/\e[1m$arg\e[21m/g'"; -} - -print " | sed"; - -foreach $arg (@ARGV) -{ - print " -e 's/ $arg)/ \e[1m$arg\e[21m)/g'"; - print " -e 's/ $arg\$/ \e[1m$arg\e[21m/g'" -} - -print ")"; |