https://blog.gnustavo.com/2019/03/perl-weekly-chalenge-2.html
