Help for this page

Select Code to Download


  1. or download this
    my %procid;
my %procidcount;
...
foreach my $ids (sort keys %procid) {
        printf "Average for $ids is %f...\n", $procid{"$ids"} / $proci
+dcount{"$ids"};
}
  2. or download this
    1234-5678 12 .345678
1234-5678 90 .123456
1234-5674 12 .345678
1234-5674 90 .123456
1234-5674 12 .345678
  3. or download this
    Average for 1234-5674 is 0.271604...
Average for 1234-5678 is 0.234567...