package Net;

our @net_pnics;

sub fill_array {
    @net_pnics = qw(foo bar);
}
1;