在网上看到这个脚本感觉很不错，记录一下:
history | perl -F"\||<\(|;|\`|\\$\(" -alne 'foreach (@F) { print $1 if /\b((?!do)[a-z]+)\b/i }' | sort | uniq -c | sort -nr 7 sort 6 ls 5 history 5 clear 4 uniq 4 perl 3 telnet 3 head 3 cd 3 alne 2 pwd 1 cat
订阅我的文章
在网上看到这个脚本感觉很不错，记录一下:
history | perl -F"\||<\(|;|\`|\\$\(" -alne 'foreach (@F) { print $1 if /\b((?!do)[a-z]+)\b/i }' | sort | uniq -c | sort -nr 7 sort 6 ls 5 history 5 clear 4 uniq 4 perl 3 telnet 3 head 3 cd 3 alne 2 pwd 1 cat
学习一下。。