3 #open IFCONF, 'ifconfig | grep "inet .*broadcast" |' or die 'haha';
9 #my @cc = split /\s+/, `ifconfig | grep "inet .*broadcast"`;
10 #my $aa = `ifconfig | grep "inet .*broadcast"`;
13 #my $aa =~ m/([0-9]{1,3}\.){3}[0-9]{1,3}/;
15 my $ff = (split / /, `ifconfig | grep "inet .*broadcast"`)[0];
16 print "==||" . $ff . "==\n";