summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorShoichi Kaji <skaji@cpan.org>2018-04-22 13:29:34 +0200
committerShoichi Kaji <skaji@cpan.org>2018-04-22 13:29:34 +0200
commit3e0348ccccf637fddd538c2da6cab4888d6585f4 (patch)
tree6ff389eb1cb66addfe055cea5c301fbf56eb3413
parent4fd548db81539da84c92c89dfa61fbdee952c119 (diff)
downloaduri-silent-warning.tar.gz
silent "Use of uninitialized value in lc" warningsilent-warning
-rw-r--r--lib/URI/file/Base.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/URI/file/Base.pm b/lib/URI/file/Base.pm
index dc1daf8..6beca59 100644
--- a/lib/URI/file/Base.pm
+++ b/lib/URI/file/Base.pm
@@ -66,8 +66,8 @@ sub _file_is_localhost
return 1 if $host eq "localhost";
eval {
require Net::Domain;
- lc(Net::Domain::hostfqdn()) eq $host ||
- lc(Net::Domain::hostname()) eq $host;
+ lc(Net::Domain::hostfqdn() || '') eq $host ||
+ lc(Net::Domain::hostname() || '') eq $host;
};
}