$l[$#l] .= ':ppn='.$options->{ppn};
}
if ($options->{mem}) {
- push @l,'mem=',$options->{mem};
+ push @l,'mem='.$options->{mem};
}
push @qo,'-l',join(',',@l) if @l;
+ if ($options->{interactive}) {
+ push @qo,'-I';
+ }
+ return @qo;
}
sub read_array_options{