Perl错误:打开文件时参数无效

Question

我是perl的新手.我试图执行下面提到的程序:

我正在尝试打开文件并从文件中读取内容.

$FILE=open(FILE,"\\10.82.71.28\Testing501\Test_Folder\834_KMS_FACE_834A.mms");
 if($FILE)
  {
   print "The file: $FILE has opened successfully";
  }
 else
{
  die "There is an error while opening the file :$!\n";
}

while($record=<FILE>)
{
  print $record;
}

close(FILE);

但在执行程序时,我遇到了一个错误:

打开文件时出错:参数无效

Answer 1

如果你执行

print "\\10.82.71.28\Testing501\Test_Folder\834_KMS_FACE_834A.mms";

你得到

Unrecognized escape \T passed through at a.pl line 1.
Unrecognized escape \T passed through at a.pl line 1.
Unrecognized escape \8 passed through at a.pl line 1.
\10.82.71.28Testing501Test_Folder834_KMS_FACE_834A.mms

(你确实用过use strict; use warnings;,对吧？)

您希望代码生成以下字符串:

\\10.82.71.28\Testing501\Test_Folder\834_KMS_FACE_834A.mms

如您所见,以下显然不会产生所需的字符串:

"\\10.82.71.28\Testing501\Test_Folder\834_KMS_FACE_834A.mms"

您可以使用以下内容:

"\\\\10.82.71.28\\Testing501\\Test_Folder\\834_KMS_FACE_834A.mms"