'array_all_in_one_job|array-all-in-one-job!',
'ppn|processors-per-node=i',
'mem|memory=s',
+ 'time|walltime=s','cputime|cput=s','host=s',
+ 'pmem|process_mem|process-mem=s',
+ 'pvmem|process_virtual_mem|process-virtiual-mem=s',
+ 'max_file|max-file|file=s',
'dir=s',
'name=s',
'debug|d+','help|h|?','man|m');
if (defined $options->{ppn}) {
$l[$#l] .= ':ppn='.$options->{ppn};
}
- if ($options->{mem}) {
- push @l,'mem='.$options->{mem};
+ my %l_options =
+ (mem => 'vmem',
+ time => 'walltime',
+ cputime => 'cput',
+ host => 'host',
+ pmem => 'pmem',
+ pvmem => 'pvmem',
+ max_file => 'file',
+ );
+ for my $k (keys %l_options) {
+ if ($options->{$k}) {
+ push @l,$l_options{$k}.'='.$options{$k};
+ }
}
push @qo,'-l',join(',',@l) if @l;
if ($options->{interactive}) {