use warnings 'all';
use strict;
use diagnostics;
и правь
PS: И не лучше-ли сделать цикл вне функции?