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