update runner scripts to allow different experiment arguments
This commit is contained in:
26
scripts/multi_runner.pl
Normal file
26
scripts/multi_runner.pl
Normal file
@ -0,0 +1,26 @@
|
||||
#!/usr/bin/env perl
|
||||
|
||||
use strict;
|
||||
use warnings;
|
||||
use diagnostics;
|
||||
|
||||
use FindBin;
|
||||
use lib $FindBin::Bin;
|
||||
|
||||
use Util;
|
||||
|
||||
use feature 'say';
|
||||
|
||||
my $remote_root = '/home/lab/smchurla/Documents/failnix';
|
||||
my $remote_builds_dir = "$remote_root/builds";
|
||||
|
||||
# Run experiments
|
||||
my @experiments = Util::find_subdirs($remote_builds_dir);
|
||||
for my $experiment (@experiments) {
|
||||
say "Running experiment: $experiment";
|
||||
my $experiment_runner = "$remote_builds_dir/$experiment/runner.pl";
|
||||
system( "perl", $experiment_runner, $experiment ) == 0
|
||||
or warn "runner.pl failed for $experiment: $?";
|
||||
}
|
||||
|
||||
Util::notify("Finished all experiments");
|
||||
Reference in New Issue
Block a user