Help for this page

Select Code to Download


  1. or download this
    ...
    my %count;
    
    $count{$_}++ for @dates;
    print "$count{$_} times $_\n" for sort {$count{$b} <=> $count{$a}} key
    +s %count;
    
  2. or download this
    Content-Type: text/html; charset=ISO-8859-1
    
    ...
    2 times 02/01/2009
    2 times 01/31/2009
    1 times 01/01/2009