use strict;
use warnings;


open (POSITION, "path to file"); 
        my(@array1) = <POSITION> ;
        close POSITION ;
        
        open(APRI2, "path to file") ;       
        my(@array2) = <APRI2>;
        close APRI2;
        

my @join = (@array1, @array2);
print @join;
        
        
exit;