#!/usr/bin/perl -wl
use strict;

use Net;

Net::fill_array();

print "@Net::net_pnics";    # "foo bar"