#Lines read from Position
$arr1[0]="1 2 3";
$arr1[1]="4 5 6";

#Lines read from APRI
$arr2[0]="a b c";
$arr2[1]="d e f";

#Assume same number of lines has been read
for($idx=0;$idx<=$#arr1;$idx++)
{
    $comb=join(" ",$arr1[$idx],$arr2[$idx]);
        print "\nComb: $comb";
}
[download]