diff options
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 ")"; |