Help for this page
#!/usr/bin/perl # ... printf qq{%4d => %d\n}, $value, $count; }
1 => 0 2 => 0 ... 23 => 0 24 => 0 25 => 0