设置文件路径 - Perl脚本

时间:2016-01-08 18:46:54

标签: perl

我要做的是将bcp日志文件取出(日志文件夹)并将其移动到具有当前时间(历史文件夹)的另一个目录。但是,每次执行此Perl脚本时,它都会声明"在第18行和第34行没有这样的文件或目录;

以下是我的代码:

## SET FILE PATHS
my $myBCPDump = "//Server-A/X:/Main Folder/Log/bcpLog.txt";
my $myBCPLog = "//Server-A/X:/Main Folder/History/bcpLog" . $myDate . ".txt"; 

my $isJunk = "rows successfully|rows sent to SQL|packet size|Starting copy|^\n|Clock Time";

open (LOGFILE, ">$myBCPLog") or die $!; ##Line 18

close (LOGFILE);

我知道它无法找到文件或目录,因为## SET FILE PATHS没有正确执行,我不知道为什么。

1 个答案:

答案 0 :(得分:2)

//Server-A/X:/...不是Windows中的有效路径。除了驱动器号(:)之外,路径中不允许冒号(C:...)。但是你有一个UNC路径(\\server\share\...又名//server/share/...),而那些没有驱动组件。你或许是//Server-A/X$/...吗?如果是的话,

"//Server-A/X:/..."

应更改为

之一
"//Server-A/X\$/..."

'//Server-A/X$/...'