我的程序通过 windows 中的命令行从文件目录的用户那里获取输入,然后在指定路径上运行 diruse 以收集有关可用磁盘空间的信息。由于某种原因,错误一直说“diruse.exe 未被识别为内部或外部命令”。下面是我的一段代码,要完整查看,请到这里。我把代码从它的 sub 中取出来看看它是否可以工作,但它没有。
&argument_checking; #calling sub checking user arguements.
#&reading_directory; # reads user given directory.
chdir($user_directory), or die " Directory $user_directory does not exist"; #change to user directory or exit.
open(DIRUSE, "diruse.exe /* . |"); #opening user given directory path.
foreach my $directory_lines(<DIRUSE>)
{
chomp $directory_lines;
push(@directory_lines, $directory_lines); #pushing directory lines from file into an array
}
close(DIRUSE); #closing
shift(@directory_lines);
shift(@directory_lines);
pop(@directory_lines);
&chop_and_save;
&gui_creator;