@array = read_array_options(\%options) if $options{array};
# the -t option gives the range of elements for an array job
push @qsub_options,'-t','1-'. scalar @array;
- if ($options->{array_slot_limit}) {
- @qsub_options[$#qsub_options] .= '%'.$options->{array_slot_limit};
+ if ($options{array_slot_limit}) {
+ $qsub_options[$#qsub_options] .= '%'.$options{array_slot_limit};
}
}
call_qsub(\@qsub_options,write_qsub_script(\%options,\@ARGV,\@array));