/challenge-348/bob-lied/perl/