System Infos in Perl

Sys::HostIP - Try really hard to get IP addr.

Sys::Hostname - Try every conceivable way to get hostname

use Sys::HostIP;
$ipaddr= hostip; # get (text) dotted-decimal ip

print "$ipaddr\n";


use Sys::Hostname;
$host = hostname;

print "$host\n";