diff --git a/lib/File/DirWalk.pm b/lib/File/DirWalk.pm index e9379ce..5836255 100644 --- a/lib/File/DirWalk.pm +++ b/lib/File/DirWalk.pm @@ -136,7 +136,7 @@ sub walk { } } - opendir my $dirh, $path || return FAILED; + opendir (my $dirh, $path) || return FAILED; my @dir_contents = readdir $dirh; @dir_contents = File::Spec->no_upwards(@dir_contents);