my $input = "netaddr   10.1.4.43   Internet Address   True";
my $ipaddress = "unknown";

if ( $input =~ /([0-9]+\.[0-9]+\.[0-9]+\.[0-9]+)/ )
{
    $ipaddress = $1;
}


print $ipaddress . "\n";