Mega Code Archive

 

Categories / Perl / Array

 

Push one array to another array

@a1 = (1, 2, 3); @a2 = (4, 5, 6); push (@a1, @a2); print join (", ", @a1);