You did, Pass variable as Directory.

The <> form of wildcard expansion has semantic weaknesses, taking $dir as a reference to a filehandle. Use glob instead. my @allfiles = glob $dir;