https://blog.gnustavo.com/2019/04/perl-weekly-challenge-3.html
