出道算术题[精彩回复]

home_king

最初由 hgkrt 发表
第一次看到女孩子如此厉害!!!

我也开始学shell programming了...

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

倩儿的代码有点冗余，我修正一下。

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

复制代码

cozo

1. 
   
2. #!/usr/bin/python
   
3. f = open('in.txt')
   
4. s = f.readline()
   
5. d = {}
   
6. while not s == '':
   
7.     oi = s.split()
   
8.     if oi[0] in d:
   
9.         d[oi[0]] += int(oi[1])
   
10.     else:
    
11.         d[oi[0]] = int(oi[1])
    
12.     s = f.readline()
    
13. f.close()
    
14. for x,v in d.items():
    
15.     print x,v
    

复制代码

KornLee

呵呵,有种百花争鸣的劲头~,谢谢!
ps:虽然看不懂python :p

idkey

好热闹，我也来一个
[php]
#!/usr/bin/env python
# -*- coding: GB2312 -*-
# Last modified: 2004年03月24日 星期三 18时42分40秒 [debian]
f=open('file')
a=f.readlines()
l=[[x[0], int(x[1])] for x in [x.split() for x in a]]
d={}
def ins(i,n):d=d.get(i,0)+n
[ins(x[0], x[1]) for x in l]
print '\n'.join(map(lambda x: "%s %s" %(x, d[x]), d.keys()))
[/php]

dearvoid

今日得闲，写个纯 bash 的：

1. 
   
2. [color=red]-(root@daisy)--(~/trash)-
   
3. [18394 0] % cat data[/color]
   
4. a 100
   
5. g 200
   
6. o 300
   
7. g 400
   
8. a 500
   
9. a 600
   
10. o 760
    
11. [color=red]-(root@daisy)--(~/trash)-
    
12. [18394 0] % cat sum.sh [/color]
    
13. #/bin/bash
    
14. 
    
15. unset -v a b c d e f g h i j k l m n o p q r s t u v w x y z
    
16. 
    
17. while read letter number; do
    
18.     eval "(($letter += $number))"
    
19. done < data
    
20. 
    
21. for letter in a b c d e f g h i j k l m n o p q r s t u v w x y z; do
    
22.     eval "[ \$$letter ] && echo sum[$letter] = \$$letter"
    
23. done
    
24. [color=red]-(root@daisy)--(~/trash)-
    
25. [18394 0] % ./sum.sh [/color]
    
26. sum[a] = 1200
    
27. sum[g] = 600
    
28. sum[o] = 1060
    
29. [color=red]-(root@daisy)--(~/trash)-
    
30. [18394 1] % [/color]
    

复制代码

aaccdd

请教一下几个符号的含义：
+=, -+, *=, /=

KornLee

最初由 aaccdd 发表
请教一下几个符号的含义：
+=, -+, *=, /=

+=:递增
-=:递减
*=:递乘
/=:递除