Solutions to weekly challenge 289 by Bob Lied

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