anchor.diff:      }
   }
   
  -unlink( $outfile );
   chdir( ".." );
       
   # Preserve existing results directory
  
positive.code: use warnings;
  
  use File::Basename;
  use English;
  
  my $script_name = basename( $PROGRAM_NAME );
  
negative.code: 
  unless( scalar @ARGV == 1 )
  {
      warn "usage: $script_name OUTDIR\n";
      exit(-1);
  }
  
  my $outdir = "$script_dir\\$ARGV[0]";
  
  die "Directory $outdir exists\n" if -d $outdir;
  
  mkdir( $outdir );
  
  sub my_exec
  {
      my $cmd = shift;
    
      # Unique filenames based on hash of command line
      my $base_filename = "$outdir\\" . md5_hex( $cmd );
      my $tmp_filename = "$base_filename.tmp";
      my $out_filename = "$base_filename.txt";
  
      system( "echo $cmd > $tmp_filename" );
      system( "$cmd >> $tmp_filename 2>&1" );
      
      # Post process raw output file to remove noise
      open( my $in, "<$tmp_filename" );
      open( my $out, ">$out_filename" );
  
      while( my $line = <$in> )
      {
          # Remove random temp file names
          $line =~ s/AppData\\\S*//;
  
          # Remove ETA info
          $line =~ s/\d{2}:\d{2}:\d{2} (AM|PM)//g;
  
          # Remove time from autogenerated results dir
          if( $line =~ /results/ )
          {
              $line =~ s/-\d{4}-\d{2}-\d{2}_\d{2}-\d{2}-\d{2}//g;
          }
  
          # Remove "Done" line with overall runtime
          $line =~ s/^Done.*//;
  
          print $out $line;
      }
  
      close $in;
      close $out;
  
      unlink( $tmp_filename );
  }
      
  sub run_one
  