my @num_weights = [36,264,188];

##</code><code>##

my @sub_array = (36,264,188); ##real array
my @num_weights = (\@sub_array); ##real array containing 1 reference

##</code><code>##

my @num_weights = (36,264,188);
my @leftovers = (1,2,3,4);
my @hold_generations;
 my $i = 0;
        
        for(my $p = 0; $p < 1;$p++) #Go through all leftovers
            {
                my $pick = $leftovers[$p];
                unshift @num_weights, $pick; #add item
                say Dumper(@num_weights);
            }

##</code><code>##

$VAR1 = 1;
$VAR2 = 36;
$VAR3 = 264;
$VAR4 = 188;