for ( 0..4999) { $array[$_] = $_; }