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

Parameters 使用Openvms DCL中的文件进行迭代,parameters,openvms,dcl,Parameters,Openvms,Dcl,我有这个文件input.text,大概有20行。(尽管我希望能够使用任意数量的行) 因此,我想打开上述文件并使用每个字符串,就像它是另一个命令的参数一样 另一个命令将使每个参数执行其功能,然后将输出写入另一个文件本身 如何实现预期目标?以下是一个示例DCL命令文件,该文件读取INPUT.TXT,并将找到的行用作DIR命令的参数,该命令输出到名为DIROUT.TXT的文件: $! Read file using results as DIR command parameters... $ file

我有这个文件
input.text
,大概有20行。(尽管我希望能够使用任意数量的行)

因此,我想打开上述文件并使用每个字符串,就像它是另一个命令的参数一样

另一个命令将使每个参数执行其功能,然后将输出写入另一个文件本身


如何实现预期目标?

以下是一个示例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

您应该能够根据自己的要求调整此选项。

查看一下,
如果
转到
关闭
>>,比如说20行。(尽管我希望能够使用任意数量的行)->行数不相关,使用
open log input.txt
一个标签循环,一个
read/end=end log line
然后一个
goto loop
你可以读取一个文件,而不管行数是多少(在
close log
的地方添加一个标签末端),很好!谢谢@DennisP。我只是把它作为DCL世界的起点:)