https://grey-panther.net/2008/06/get-the-ip-of-the-local-computer-from-perl.html Just another WordPress site Tue, 09 Dec 2008 16:24:08 +0000 hourly 1 https://wordpress.org/?v=6.9 https://grey-panther.net/2008/06/get-the-ip-of-the-local-computer-from-perl.html#comment-591 Tue, 09 Dec 2008 16:24:08 +0000 https://grey-panther.net/?p=701#comment-591 my @data = `ifconfig`;
my @data1=split (/ +/, $data[1]);
my @data2=split (/:/, $data1[2]);
my $local_ip=$data2[1];

]]>