parameters - 使用 Openvms DCL 中的文件进行迭代

Question

我有这个文件input.text，说 20 行。（虽然我希望能够使用任意数量的行）

所以我想打开所述文件并使用每个字符串，就好像它是另一个命令的参数一样。

这个另一个命令将使用每个参数执行它的功能，然后将输出写入另一个文件本身。

我怎样才能达到预期的目的？

Answer 1

这是一个示例 DCL 命令文件，它读取 INPUT.TXT 并将找到的行用作 DIR 命令的参数，该命令输出到名为 DIROUT.TXT 的文件：

$! Read file using results as DIR command parameters...
$ file1="INPUT.TXT"
$ file2="DIROUT.TXT"
$ open/read chnl1 'file1'
$ on control_y then goto done_loop
$ on error then goto done_loop
$read_loop:
$ read/end_of_file=done_loop chnl1 opt1
$ write sys$output ">>> Sending DIR ",opt1," output to ''file2'..."
$ dir/out='file2' 'opt1'
$ goto read_loop
$done_loop:
$ close chnl1
$ write sys$output "Finished..."
$ EXIT

您应该能够根据您的要求进行调整。