perl - Perl、特別なモジュールなしでインターフェイスのリストを取得

Question

vnstat/vnstati で Webfront 用の Perl スクリプトを書いています。Net::Interfaceまたはのような特別なモジュールなしでインターフェイスのリストを作成する方法がわかりませんOS::Interface

これが私がbashでやっている方法です：

ip addr show|grep "^[0-9]:"|grep -e "state UP"|cut -d':' -f2

これは wlan1 を返しますが、Perl 内で配列を作成する必要があります。これが私がこれまでに持っているものです：

my @graphs = (
        { interface => 'eth0' },
        { interface => 'venet0' },
);

これが「デフォルト」ですが、一部のマシンには 1 つ以上あり、新しいテスト サーバーを構築するたびにカスタマイズしたくありません。

Answer 1

質問はなんですか？そのシェルコマンドの出力を実行してキャプチャする方法は？

my $output = `...command...`;