foreach my $idx ( 0 .. $#array ) {
    do_something($array[$idx]) unless $idx % 3;
    # Do something else that isn't filtered by iteration number.
}