# doc
my $mas = Masscan::Scanner->new(hosts => \@hosts, ports => \@ports, arguments => \@arguments);

#your code
$av_obj_MAS->add_port(@av_arr_PORTS);


##</code><code>##

perl -MData::Dumper -e "$hash{lvl1}[3]{lvl3}[0] = 42; print Dumper \%hash"

$VAR1 = {
          'lvl1' => [
                      undef,
                      undef,
                      undef,
                      {
                        'lvl3' => [
                                    42
                                  ]
                      }
                    ]
        };