IPアドレス一覧を取得（IO::Interface::Simpleを利用）

IPアドレス一覧取得サンプル

以下にIO::Interface::Simpeを利用したIPアドレス一覧取得方法を示します。 サンプルは、全てのネットワークインターフェース情報を取得後に、それぞれのIPアドレス情報をprintしています。

#!/usr/bin/perl

use IO::Interface::Simple;

# ネットワークインターフェース一覧を取得
@ifs = IO::Interface::Simple->interfaces;

# 取得した情報を表示
foreach $i (@ifs) {
  print $i->address;
  print "\n";
}

exit;