foreach $_ (@array) { 
  @array2 = grep {$_ =~ "unknown type(0x134e) 30.6511 (V6.5.1 FP1)"} (@array); 
  print FILE "@array2"; 
  close(FILE);