Solutions to weekly challenge 218 by Bob Lied

https://perlweeklychallenge.org/blog/perl-weekly-challenge-218/
https://github.com/boblied/perlweeklychallenge-club/tree/master/challenge-218/bob-lied