opendir my $dirh, $path || return FAILED;