for (; $first <= $last; $first++) { print $c->article($first); } #### ($first, $last) = ($newserver->group($newsgroup)); my @messages = ($first..$last); foreach (@messages) { print $c->article($_); } #### ($first, $last) = ($newserver->group($newsgroup)); my @messages = ($first..$last); my $count = 0; foreach (@messages) { if ($_ = undef || "") { splice(@testlist, $count, 1); } $count++; } foreach (@messages) { print $c->article($_); }