my $str = `ifconfig eth0 |grep "inet addr:"`;
$str =~ s/addr:(.+)\s?//;
my $host = $1;