windows - 以任何语言循环执行diskpart命令的更好方法？

Question

我有 100 张必须在线制作的磁盘。我尝试了下面的 perl 代码来做同样的事情。

foreach (1..100){
    open(FILE, ">test.txt");
    print FILE ("select disk $_\nonline disk");
    close FILE;
    system("diskpart.exe /s test.txt");
}

我的问题是，有没有更有效的方法来循环执行 diskpart 命令，比如使用 shell 脚本或其他任何东西？

提前致谢！

Answer 1

diskpart.exe您可以在标准输入上通过管道传输命令，

use strict;
use warnings;
use autodie;

open my $p, '|-', 'diskpart.exe';
foreach my $i (1..100) {
    print $p "select disk $i\nonline disk\n";
}
close($p);