The Perl script I wrote to help me tabulate the votes on the contest I just ran — Steemit