my @objarray = ();

##</code><code>##

my @objarray = (
    { },
    { },
   ({ }) x 87, # 87 more elements...
    { },
    );

##</code><code>##

my @objarray = (
    { 'apts' => '???', },
    { 'apts' => '???', },
   ({ 'apts' => '???', }) x 87,
    { 'apts' => '???', },
    );

##</code><code>##

my @objarray = (
    { 'apts' => [ [11,12], [13,14], [15,16], ], },
    { 'apts' => [ [21,22], [23,24], [25,26], ], },
   ({ 'apts' => '???', }) x 87,
    { 'apts' => [ [91,92], [93,94], [95,96], ], },
    );

##</code><code>##

>perl -wMstrict -le
"my @objarray = (
     { 'apts' => [ [11,12], [13,14], [15,16], ], },
     { 'apts' => [ [21,22], [23,24], [25,26], ], },
    ({ 'apts' => '???', }) x 87,
     { 'apts' => [ [91,92], [93,94], [95,96], ], },
     );
 ;;
 print 'elements in array: ', scalar @objarray;
 print $objarray[89]{'apts'}[2][1];
"
elements in array: 90
96