sub doit {
    ....
}

doit( $args[ $_ ] ) for 0 .. $n-1;