print
    +(map "$_: $word_count{ $_ }\n",
      @gt_three_char_words[ 0 .. 9 ] ),
    "\n";