始终在perl中获取File not found错误

Question

这是我处理文件的代码。我在我的驱动器中有文件。

但我总是得到文件未找到错误。我需要提供正确的路径吗？或者代码会在这里创建一个新文件吗？

为什么我收到此错误？

我是否将文件存储在特定路径中？

我是否错过了要提及的任何内容，或者我错过了代码中的任何内容？

#open FH , ">>JEEVA.csv" or die "File not found";
#print FH $res1;
#close FH;

Answer 1

您的程序可能没有权限写入当前目录中的文件。使其打印出错误消息，解释无法打开文件的原因：

open FH, ">>JEEVA.csv" or die "could not write to JEEVA.csv: $!";

Answer 2

open(my $fh, ">>", "JEEVA.csv") or die "Cannot open JEEVA.csv: $!";
print $fh $res1;
close $fh;

在FH上确定。

Answer 3

有时环境路径将无法正确设置。所以尝试重启你的电脑。然后它可能会工作。如果这不起作用，那么我们将尝试找到另一个问题。