Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl  -w
# Find most frequent signals amidst political noise
...
    $percent=int(10000 * $count{$_} / $total)/100;
    print "$count{$_}  :$_ ($percent \%)\n";
}
  2. or download this
    76  :applause (3.46 %)
33  :america (1.5 %)
...
12  :weapons (0.54 %)
12  :war (0.54 %)