sub checkIndices { for my $item (@_){ return (1==0) if ($item < 0) } return (1==1); }