Мне всегда интересно, почему я должен напишите
foreach my $x (@arr)
вместо
foreach my $x @arr
Для чего здесь скобки?