Fix a split on undefined value warning

Something that perlbrew is doing seems to tickle this bug.

diff --git a/lib/local/lib.pm b/lib/local/lib.pm
index 80ac618..a1a3b5e 100644 (file)
--- a/lib/local/lib.pm
+++ b/lib/local/lib.pm
@@ -405,7 +405,7 @@ sub _env_list_value {
                  && (!$options{exists} || -e $_))
     } map {
       if (ref $_ eq 'SCALAR' && $options{interpolate} == INTERPOLATE_ENV) {
-        exists $ENV{${$_}} ? (split /\Q$Config{path_sep}/, $ENV{${$_}}) : ()
+        defined $ENV{${$_}} ? (split /\Q$Config{path_sep}/, $ENV{${$_}}) : ()
       } else {
         $_
       }