perl에서 qsub에 여러 스크립트 제출하기

Question

다른 것들 중에서 qsub에 3 개의 스크립트를 제출하는 펄 스크립트를 작성하고 있습니다. 첫 번째 작업이 완료되면 내 스크립트에 "알리는"방법은 무엇입니까? qsub가 작업 상태를 저장하는 변수에 액세스하는 몇 가지 방법이 있다고 가정하지만 그 사실을 알 수는 없습니다.

---

업데이트 : qsub에 플래그를 사용하지 마십시오.

qsub -hold_jid job2 job1

Answer 1

PBS::Client보십시오 :

---

use strict; 
use warnings; 
use PBS::Client; 

my $pbs = PBS::Client->new; 
my $job1 = PBS::Client::Job->new(cmd => "./a1.out"); 
my $job2 = PBS::Client::Job->new(cmd => "./a2.out"); 
my $job3 = PBS::Client::Job->new(cmd => "./a3.out"); 

$job1->next({ ok => $job2 }); # Run $job2 if $job1 ran OK 
$job2->next({ ok => $job3 }); # Run $job3 if $job2 ran OK 

$pbs->qsub($job1);