/challenge-286/kjetillll/perl/