From 98266e1cd09a3d586705aefc9d541dda2883718a Mon Sep 17 00:00:00 2001 From: Jens Luedicke Date: Sun, 2 Sep 2012 19:09:38 +0200 Subject: [PATCH] B: Avoid problem with operator precedence. --- lib/File/DirWalk.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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);