/challenge-336/tim-potapov/perl/