diff options
author | Brian Fraser <fraserbn@gmail.com> | 2013-05-14 08:59:06 -0300 |
---|---|---|
committer | Brian Fraser <fraserbn@gmail.com> | 2014-01-26 16:55:44 -0300 |
commit | f03408aa5b712336301a4274dfb016690ba9d4e1 (patch) | |
tree | 9e103554038f9f1ebb49add4abc0c3ae309a00d2 | |
parent | 121b46ef80e0c8714229bed2570a1927c887dfc0 (diff) | |
download | perl-libnet-f03408aa5b712336301a4274dfb016690ba9d4e1.tar.gz |
Net::Domain: Stop domainname() from giving out warnings in android
-rw-r--r-- | Net/Domain.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Net/Domain.pm b/Net/Domain.pm index d47f8be..59c803a 100644 --- a/Net/Domain.pm +++ b/Net/Domain.pm @@ -169,7 +169,7 @@ sub _hostdomain { } chop($dom = `domainname 2>/dev/null`) - unless (defined $dom || $^O =~ /^(?:cygwin|MSWin32)/); + unless (defined $dom || $^O =~ /^(?:cygwin|MSWin32|android)/); if (defined $dom) { my @h = (); |