diff options
| author | Mattias Andrée <maandree@operamail.com> | 2012-08-18 15:15:57 +0200 |
|---|---|---|
| committer | Mattias Andrée <maandree@operamail.com> | 2012-08-18 15:15:57 +0200 |
| commit | ce3fac588fb84a109244b9c3d60aba4fc247a86f (patch) | |
| tree | b71327f306709adea511a58c3c86dd1cf968aecd /pq4ps-list.pl | |
| parent | 73d477ce1b57d82150bff04d74e6eb2dc1391a3d (diff) | |
| download | ponysay-ce3fac588fb84a109244b9c3d60aba4fc247a86f.tar.gz ponysay-ce3fac588fb84a109244b9c3d60aba4fc247a86f.tar.bz2 ponysay-ce3fac588fb84a109244b9c3d60aba4fc247a86f.zip | |
adding .sh to shell version + removing old files
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 ")"; |