程嶏清单6-16.txt

来自「< linux网络编程工具>>配套源码」· 文本 代码 · 共 10 行

@array = (0..9);
print("@array\n");
for ($index = 0; $index < @array; $index++) {
    if ($index == 3 || $index == 5) {
        next;
    }
    $array[$index] = "*";
}
print("@array\n");