use DateTime;
use Data::Dumper;
use List::Util qw(shuffle);
use List::MoreUtils qw(firstidx);
use JSON;
use Moose;
use namespace::autoclean;
extends 'HPC::Runner';
with 'MooseX::SimpleConfig';
# For
atchname};
my $json = JSON->new->allow_nonref;
my $json_text = $json->encode( $batch );
$DB::single=2;
$json_text = " --metastr \'$json_text\'";
return $json_text;
}
sub creat