Как да пускаме решения на Perl в Judge?

На задачата Allocate Array с този код решението ми не минава https://pastebin.com/uEJ8AvLT в judge. Нещо допълнително ли трябва да напиша или просто кода ми е грешен?

Здравей,

Можеш да избереш език от тук.