~ubuntu-branches/ubuntu/utopic/openssl/utopic

« back to all changes in this revision

Viewing changes to .pc/perl-path.diff/crypto/lhash/num.pl

  • Committer: Bazaar Package Importer
  • Author(s): Kurt Roeckx
  • Date: 2011-04-02 13:19:19 UTC
  • mfrom: (1.2.1 upstream) (11.2.2 experimental)
  • mto: This revision was merged to the branch mainline in revision 55.
  • Revision ID: james.westby@ubuntu.com-20110402131919-anszuslper64ey9e
Tags: 1.0.0d-1
* New upstream version
  - Fixes CVE-2011-0014
* Make libssl-doc Replaces/Breaks with old libssl-dev packages
  (Closes: #607609)
* Only export the symbols we should, instead of all.
* Add symbol file.
* Upload to unstable

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
#!/usr/local/bin/perl
2
 
 
3
 
#node     10 ->   4
4
 
 
5
 
while (<>)
6
 
        {
7
 
        next unless /^node/;
8
 
        chop;
9
 
        @a=split;
10
 
        $num{$a[3]}++;
11
 
        }
12
 
 
13
 
@a=sort {$a <=> $b } keys %num;
14
 
foreach (0 .. $a[$#a])
15
 
        {
16
 
        printf "%4d:%4d\n",$_,$num{$_};
17
 
        }