**Challenge 244 solutions in Perl by Matthias Muth**
(no blog post this time...) **Thank you for the challenge!**