Help for this page
file1 1 ... 8 24 48 so 2 43 56 printed
if ($file1[0] == $file2[0]) {print @file2}