diff options
author | redpony <redpony@ec762483-ff6d-05da-a07a-a48fb63a330f> | 2010-08-10 20:03:53 +0000 |
---|---|---|
committer | redpony <redpony@ec762483-ff6d-05da-a07a-a48fb63a330f> | 2010-08-10 20:03:53 +0000 |
commit | 963b7b96576de000a743ef377c439ea5c6787e2e (patch) | |
tree | c44b113de22473a74b831867dd2c8fed8d4d56f4 /vest/parallelize.pl | |
parent | 86ae2fcf6207630c03ec222131346a6fd8fee10a (diff) |
support for running in multiple environments which are automatically detected
git-svn-id: https://ws10smt.googlecode.com/svn/trunk@501 ec762483-ff6d-05da-a07a-a48fb63a330f
Diffstat (limited to 'vest/parallelize.pl')
-rwxr-xr-x | vest/parallelize.pl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/vest/parallelize.pl b/vest/parallelize.pl index a5a40704..daaf9b2f 100755 --- a/vest/parallelize.pl +++ b/vest/parallelize.pl @@ -18,6 +18,9 @@ #ANNOYANCE: if input is shorter than -j n lines, or at the very last few lines, repeatedly sleeps. time cut down to 15s from 60s +my $SCRIPT_DIR; BEGIN { use Cwd qw/ abs_path /; use File::Basename; $SCRIPT_DIR = dirname(abs_path($0)); push @INC, $SCRIPT_DIR, "$SCRIPT_DIR/../environment"; } +use LocalConfig; + use File::Temp qw/ tempfile /; use Getopt::Long; use IPC::Open2; @@ -303,7 +306,7 @@ sub launch_job { push @errors,$errorfile; push @outs,$outfile; } - my $todo = "qsub -l mem_free=$pmem -N $clientname -o $outfile -e $errorfile"; + my $todo = qsub_args($pmem) . " -N $clientname -o $outfile -e $errorfile"; push @cmds,$todo; print STDERR "Running: $todo\n"; |