if ($file1[0] eq $dealerno) { @file2[0..10] = @file1[0..10]; }