Return to install.pl CVS log | Up to [LON-CAPA] / doc / install / linux |
version 1.47, 2018/07/17 00:19:51 | version 1.48, 2018/10/16 17:23:08 |
---|---|
Line 472 sub check_required { | Line 472 sub check_required { |
$hostname =&get_hostname(); | $hostname =&get_hostname(); |
} | } |
} | } |
$hostname = Sys::Hostname::FQDN::fqdn(); | |
$hostip = Socket::inet_ntoa(scalar(gethostbyname($hostname)) || 'localhost'); | $hostip = Socket::inet_ntoa(scalar(gethostbyname($hostname)) || 'localhost'); |
if ($hostip eq '') { | if ($hostip eq '') { |
$hostip=&get_hostip(); | $hostip=&get_hostip(); |