Solutions to weekly challenge 183 by Bob Lied

https://perlweeklychallenge.org/blog/perl-weekly-challenge-183/