Dass @entries in dem Gültigkeitsbereich nicht deklariert wurde. Das hat meistens mit einem fehlenden my zu tun. In meinem oben geposteten Code ist der Fehler, dass ich my @entries = () in einem relativ kleinen Scope deklariert habe und dann später in einem größeren Gültigkeitsbereich darauf zugreifen will.

Verschieb einfach die Zeile hinter das my $dir = ....

Mehr findest Du im Artikel über use strict.