if ($array2[2] eq $array1[2]){ print "$array[2]\n"; } else { print "\n\n[$array2[2]] [$array1[2]]\n\n"; }