Select Code to Download

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

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

Scalar value @file2[$cnts++] better written as @file2[$cnts++] at -foo
+.pl line 327.