【脚本】来看看自己用得最多的命令

iamkr

突然想到 .bash_histroy不是存了一堆用过的命令么 统计一下看哪个出场较高
代码写得较粗糙  比如ls|grep什么的都没识别  只认出从开头到第一个空格的命令
而我的historysize设得比较大 所以比较有统计效能 hh

也附上俺的结果 ls cd pacman 坐居前三

1. 
   
2. #!/usr/bin/perl
   
3. #20100705 kar
   
4. use strict;
   
5. use warnings;
   
6. 
   
7. my $his_file         = shift || "~/.bash_history";
   
8. my $n                        = 10;
   
9. my @l                         = `cat $his_file`;
   
10. my $all                 = `wc -l $his_file`;
    
11. my $total;
    
12. my %b;
    
13. my $i;
    
14. my $p;
    
15. my @so;
    
16. 
    
17. $all =~ /(\d*) /;
    
18. $total = $1;
    
19. 
    
20. foreach $i (@l){
    
21.         if($i!~/ /){
    
22.                 $p=$i;
    
23.         } else {
    
24.                 $i=~/(.*?) /;
    
25.                 $p=$1;
    
26.         }
    
27.         chomp($p);
    
28.         if (!defined($b{$p})){
    
29.                 $b{$p}=1;
    
30.         } else {
    
31.                         $b{$p}++;
    
32.         }
    
33. }
    
34. 
    
35. @so = ();
    
36. 
    
37. foreach $i(keys(%b)){
    
38.         unshift @so,$i."\t".$b{$i}."\t".$b{$i}/$total*100;
    
39. }
    
40. 
    
41. print "Total:$all\n";
    
42. @so=sort {
    
43.         my $ta=$a;
    
44.         my $tb=$b;
    
45.         if ($ta=~/\t(\d*)\t/){
    
46.                 $ta=$1;}
    
47.         if ($tb=~/\t(\d*)\t/){
    
48.                 $tb=$1;}
    
49.         $ta <=> $tb;
    
50. } @so;
    
51. 
    
52. @so=reverse(@so);
    
53. 
    
54. $i = 0;
    
55. while($i<$n){
    
56.         print $i+1,".";
    
57.         $p = $so[$i];
    
58.         $p =~ /(^.*\.\d\d)\d*/;
    
59.         print $1."%\n";
    
60.         $i++;       
    
61. }
    
62. 
    
63. 
    
64. 
    

复制代码

liwangli

眼下手头没机器试,但估计前五位肯定是ll,cd,vim,man,gcc吧...还有make ./a.out mount rm用的也很多

lymanrb

字符补丁……

alias fav='history | awk "{CMD[\$2]++;count++;} END { for(a in CMD) print CMD[a] \" \" CMD[a]/count*100 \"% \" a;}" | grep -v "./" | column -c3 -s " " -t | sort -nr | nl |  head -n20'

pxbfeiniao

1.sudo  336     49.12%
2.yaourt        68      9.94%
3.cd    51      7.45%
4.ls    38      5.55%
5.htop  35      5.11%
6.pacman        17      2.48%
7.sensors       16      2.33%
8.glxgears      13      1.90%
9.leafpad       12      1.75%
10.find 11      1.60%

U571

脚本思路不错
不过常年在vim中使用!命令
发现不记录到history中
soso 统计对我来说不准确

P可弓虽

1.sudo        89        24.65%
2.pacman        26        7.20%
3.echo        25        6.92%
4.yaourt        21        5.81%
5.cp        20        5.54%
6.exit        17        4.70%
7.ls        17        4.70%
8.vim        15        4.15%
9.cat        15        4.15%
10.rm        12        3.32%

lifc

1.git   267     18.78%
2.cd    197     13.86%
3.exec  146     10.27%
4.ll    85      5.98%
5.gvim  50      3.51%
6.grep  42      2.95%
7.make  35      2.46%
8.svn   32      2.25%
9.less  31      2.18%
10.pstree       31      2.18%

linan7788626

这个还是要试试的，估计ls cd 很多。make也不少

oopszj

粗略的写了一个，发现是 sodu ……

history | awk '{print $2}' | sort | uniq -c | sort -g -r -k1

去sodu版


history | awk '{if ($2=="sudo") {print $3} else {print $2}  }' | sort | uniq -c | sort -g -r -k1

这次是pacman，刚装系统。

糊涂

$ ls .bash*
.bash_history  .bash_logout  .bashrc

$ cat .bash_logout
# ~/.bash_logout
rm .bash_history
hcc

$ alias hcc
alias hcc='history -c ; clear'