Solutions to weekly challenge 103 by Bob Lied. https://perlweeklychallenge.org/blog/perl-weekly-challenge-103/