Solutions to weekly challenge 286 by Bob Lied

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