my @add1=@{$add[0]}; my @add2=@{$add[1]}; unshift(@{$arr},\@add1,\@add2);