push @Array , [ @Fields[0,3,6] ];
}
chomp @Array;
foreach my $foo (@fields) {
  print "$foo->[2]\n" if ($foo->[2] != 3);
}