$res = `IPCONFIG`; fatal("Call failed") if (!defined $res); $runcount++; ($ipaddr) = ($res =~ /(\d+.\d+.\d+.\d+)/);