我最近刚刚将我的系统从 win 7“升级”到 win 2012 r2。除了我的两个脚本访问网络驱动器上的文件外,一切都运行良好。这是我用于访问文件的一个脚本的代码:
#! perl
use DBI;
use strict;
use 5.010;
binmode(STDOUT , ":encoding(cp437)" );
@ARGV = glob "Z:\*_file.dat"; #calljob identifizieren
while(<>){
#do something
}
当我尝试使用草莓 perl 在管理控制台中运行脚本时,它会永远运行。就像一个无限循环。
我已经设置了一个“die('test');” 在while循环的第一个位置,但是当我将die-command放在循环之前时,脚本不会退出消息“test”而是脚本“dies”。我什至尝试通过 UNC 访问文件,但没有任何变化。
我的系统管理员说我拥有访问网络驱动器及其中文件的所有可能权限。当我转到 Z:\ 时,我可以看到所有文件并复制/移动/删除它们。
我的系统偏好:
Windows Server 2012 R2 数据中心
草莓 Perl(64 位)5.18.2.2