http://blogs.perl.org/users/james_curtis-smith/2020/12/perl-weekly-challenge-92.html