#!/usr/bin/gawk -f
#/* vim: set filteype=awk : */ -*- awk -*-
BEGIN{
  FS = " "
}
   {
      sub(",", "", $8)
      Occurs[$8]++
   }

END{
  for (I in Occurs)
  {
    print "Learner: " I " won: " Occurs[I] " times.";
  }
}