summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
057c619)
And do not generate multi-line error message.
$ip = addr_to_ip($res[0]->{addr})
};
if ($@) {
$ip = addr_to_ip($res[0]->{addr})
};
if ($@) {
- die "hostname lookup failed:\n$@" if !$noerr;
+ die "hostname lookup '$hostname' failed - $@" if !$noerr;
return undef;
}
if ($ip =~ m/^127\.|^::1$/) {
return undef;
}
if ($ip =~ m/^127\.|^::1$/) {
- die "hostname lookup failed - got local IP address ($hostname = $ip)\n" if !$noerr;
+ die "hostname lookup '$hostname' failed - got local IP address '$ip'\n" if !$noerr;