update targets

This commit is contained in:
2026-04-18 19:46:45 +02:00
parent 5dd763fd8a
commit 40d40bc57b
7 changed files with 269 additions and 36 deletions

View File

@ -64,8 +64,6 @@ my $ssh = Net::OpenSSH->new(
$ssh->error and die 'SSH connection failed: ' . $ssh->error;
say 'Connected to mars.cs.tu-dortmund.de';
# TODO: Abort if old experiments are still on the server => meaning they're not archived
# Pull changes
# remote( $ssh, 'git', '-C', $remote_root, 'pull' ); # TODO: Requires auth
@ -111,18 +109,7 @@ foreach (@experiments) {
or die "Failed to create database: " . $dbh->errstr;
}
# Kill old screen session (don't check success as a session might not exist)
# say "Killing previous screen session with name $screen_name";
# $ssh->system( "screen", "-XS", $screen_name, "quit" );
# Start new screen session
# my $invoke_runner =
# "cd " . shell_quote($remote_root) . " && perl " . shell_quote($remote_runner);
# say
# "Starting new screen session with name $screen_name and command $invoke_runner";
# remote( $ssh, "screen", "-dmS", $screen_name, "sh", "-lc",
# "exec $invoke_runner" );
# Launch remote runner
remote( $ssh,
"nohup sh -c "
. shell_quote("cd $remote_root && perl $remote_runner") . " >"