Select Code to Download

sub RunAll{
    $run_job1_bttn->invoke();
    $run_job2_bttn->invoke();
    $run_job3_bttn->invoke();
}

sub KillAll {
    my $msg = $mw->Dialog( -title   => "Warning",
        -buttons => [ "Yes",  "Cancel" ],
...
        $ec_job3->kill_command;#each $ec_job is execute_command callin
+g an external script.
    }
}