#!/usr/bin/env perl

$update = 1;

foreach (<*>) {
  -d or next;
  -e "$_/DONE" or next;
  !-e "$_/raw.h5" or next;
  chdir $_;
  system "pwd";
  system "rm *.dat";
  system "rm DONE";
  system "subslurm";
  chdir "..";
}
