极度好色的grep，非zsh用户请绕行

[roylez]

代码： 全选

alias -g G="|RANDOM=\$(date +%N) GREP_COLOR=\"\$(echo 3\$[RANDOM%6+1]';1;7')\" egrep -i"

[xiooli]

不见管道符，看起来总觉得怪怪的。

ps：太花哨了

[roylez]

要的就是这华丽丽的效果

[adam8157]

色色的...

[adagio]

[eexpress]

这不是一直 G 变GG

还是alias grep吧。增加一个并列，依次的参数。

[tusooa]

强大。

代码： 全选

tlcr: 0 庚寅年七月十七日 09:47:03 ~
● date --help G %N   
  %N    纳秒(000000000-999999999)
tlcr: 0 庚寅年七月十七日 09:47:10 ~
● 

ps：你的xterm全黑的，就不怕分不清阿。

[yaoms]

果然好色

[eexpress]

代码： 全选

☛ dog g
@_=<STDIN>;
foreach $i (@ARGV){@_=grep /$i/,@_;}
$_=join "",@_;
s/\e.*?m//g;
foreach $i (@ARGV){
        $c="\e[4;3".(int rand(7)+1).";40m";
        s/$i/$c$&\e[0m/g;
}
print;

不要zsh的管道。到哪里都可以。不要grep。只要pl的。

代码： 全选

xxx| g yyy xxx zzz uuu

[ibear]

主席一直很好色的说

[yaoms]

ee更色。。。

[ChenFengyuan]

顶ee.
顶perl.
有perl就行,lol

代码： 全选

☛ dog g
@_=<STDIN>;
foreach $i (@ARGV){@_=grep /$i/,@_;}
$_=join "",@_;
s/\e.*?m//g;
foreach $i (@ARGV){
        $c="\e[4;3".(int rand(7)+1).";40m";
        s/$i/$c$&\e[0m/g;
}
print;

不要zsh的管道。到哪里都可以。不要grep。只要pl的。

代码： 全选

xxx| g yyy xxx zzz uuu

[tusooa]

原来exp.express的g也不是alias，是用来干跟主席的G差不多的事的。
一直以为g -> grep。
貌似把颜色干掉了。

[tusooa]

获取颜色的出现几率：

代码： 全选

for i in `seq 9` ; do l G $USER | head -n1 ; done

看哪个多

[tusooa]

代码： 全选

tlcr: 0 庚寅年七月二十日 18:17:43 ~
● mv -v ~scripts/scripts-eexp/g ~scripts 
"/home/tusooa/应用/脚本/scripts-eexp/g" -> "/home/tusooa/应用/脚本/g"
tlcr: 0 庚寅年七月二十日 18:17:55 ~
● which g
/home/tusooa/应用/脚本/g
tlcr: 0 庚寅年七月二十日 18:17:59 ~
● ds g
#!/usr/bin/env perl

@_ = <STDIN>;
for $i (@ARGV){@_ = grep /$i/,@_;}
#$_ = join "",@_;
# 如果原来就有颜色呢？去掉。
#s/\e\[[0-9;]*[mK]//g;
for $i (1..@ARGV) { $col[$i] = int rand(6) +1 ; }

for (@_)
{
    $r = 0;
    for $i (@ARGV)
    {
        $r++;
        $c = "\e[1;4;3".$col[$r].";40m";
        s/($i)/$c$1\e[0m/g;
    }
    print;
}

tlcr: 0 庚寅年七月二十日 18:30:09 ~
●