Help for this page

Select Code to Download

Select or download this

map { join '.', unpack "CCCC", scalar $_->address() } 
    Net::Interface->interfaces();

Select or download this

grep { $_ eq $ip }
  map { join '.', unpack "CCCC", scalar $_->address() }
  Net::Interface->interfaces();