use FileHandle; my $fh = new FileHandle; my $dir = "/tmp"; opendir($fh, $dir) or die "Unable to open directory '$dir' ($!)\n"; my @files = readdir($fh); closedir $fh;