http://blogs.perl.org/users/e_choroba/2019/05/perl-weekly-challenge-009-square-numbers-and-ranking.html