foreach my $arrayFile(@array) {
  my $fullFile = $path . $arrayFile;
  unlink($fullFile) or die "$!\n";
  }