出道算术题[精彩回复]

KornLee

有文件file
a  100
g  200
o  300
g  400
a  500
a  600
o  760
如果第一域相同,那么计算他们的和, 即:

2. /home/javalee:awk '{sum[$1]+=$2}END{for (i in sum)print i,sum[i]}' file
3. a 1200
4. o 1060
5. g 600

复制代码

除了用awk,还有其他的方法么? ...:ask

dearvoid

perl 肯定是可以的了，回去我用 bash 试试

倩儿

最初由 dearvoid 发表
perl 肯定是可以的了，回去我用 bash 试试

1. 
   
2. #! /usr/bin/perl -w
   
3. 
   
4. if(defined($_=shift @ARGV)) {
   
5.     open INPUTFILE, "$_"
   
6.         or die "Cannot access file $_($!)";
   
7. # Read file and process
   
8.     while (<INPUTFILE>) {
   
9.         chomp;
   
10.         if(/^(\w+)\s+(\d+)$/){
    
11.             if (exists $hashdb{$1}){
    
12.                 $hashdb{$1}+=$2;
    
13.             }
    
14.             else{
    
15.                 $hashdb{$1}=$2;
    
16.             }
    
17.         }
    
18.     }
    
19.     foreach $field (sort keys %hashdb){
    
20.         print "$field has $hashdb{$field}\n";
    
21.     }
    
22.     close INPUTFILE;
    
23. }
    
24. else{
    
25.     print "No argument is supplied!\n";
    
26. }
    

复制代码

正好借这道题练习一下散列，呵呵~~

KornLee

I use bc:

2. #把文件的第一列数据取出并去掉重复的作为循环的索引
3. #在循环体里,用$i这个索引来取出对应的数数字并用bc
4. #来把这些数字相加
5. for i in $(sort txt|cut -f1 -d" "|uniq);do
6.         echo -n "$i:";echo $(sort txt|grep "\<$i\>"|tr -d 'a-z '|tr '\n' '+')0|bc
7. done

复制代码

倩儿

最初由 javalee 发表
I use bc:

1. 
   
2. for i in $(sort txt|cut -f1 -d" "|uniq);do
   
3.         echo -n "$i:";echo $(sort txt|grep "\<$i\>"|tr -d 'a-z '|tr '\n' '+')0|bc
   
4. done
   

复制代码

好复杂哦，javalee大哥解释一下吧。

倩儿

最初由 javalee 发表
倩儿的perl脚本写的很棒!

:thank，刚骑过"小骆驼"，练习而已~~
最近还在图书馆借来了"大骆驼"，呵呵。

另外，我觉得javalee大哥你的脚本写得很精炼，可见大哥深厚的shell编程功力。
不过，你给出的bc脚本似乎有点局限性。假如txt文件的格式并非完全严格地如楼顶格式，比如加入了第三域以及注释，那大哥的脚本就会出错。
姑且提点意见，这算是程序强壮性的概念吗，大哥指教。

KornLee

最初由 倩儿 发表
:thank，刚骑过"小骆驼"，练习而已~~
最近还在图书馆借来了"大骆驼"，呵呵。

另外，我觉得javalee大哥你的脚本写得很精炼，可见大哥深厚的shell编程功力。
不过，你给出的bc脚本似乎有点局限性。假如txt文件的格式并非完全严格地如楼顶格式，比如加入了第三域以及注释，那大哥的脚本就会出错。
姑且提点意见，这算是程序强壮性的概念吗，大哥指教。

你客气了~,具体情况具体分析,shell的灵活性即在于此!

倩儿

嗯，我觉得perl的伟大之处还在于,它使编写c一样强大的语言像编写shell code一样简单快捷。

KornLee

难道就没有别的方法了么?! :ask

hgkrt

第一次看到女孩子如此厉害!!!

我也开始学shell programming了...

今天出去买了本Bruee Blinn写的Unix Shell Programming入门...