@A = qw ( H1 H2 H3 H4); @B = qw (1 2 3 4 5 6 7 8 9 10); #### H1-> 1,8,9 H2-> 2,7,10 H3-> 3,6 H4-> 4,5