为什么我在尝试打开Filehandle时会导致“或死”?

时间:2016-09-27 13:58:05

标签: perl stdout stdin filepath

有人在这看到问题吗?

use FindBin '$Bin';

$scriptdir = $Bin;
$folder= "64521459";
$file = "201608291350_60002015_1_Log-Minim.csv";

print "$scriptdir\\OK\\$folder\\$file";
open (OKBLABLA, ">", "$scriptdir\\OK\\$folder\\$file") or die "Can't create OK folder";
print OKBLABLA "success";
close OKBLABLA;

似乎$folder部分导致问题;当我删除它,它的工作原理 - 任何想法为什么?脚本不会自己创建一个新目录吗?

2 个答案:

答案 0 :(得分:3)

不,open无法使用我所知的任何语言在任何平台上创建不存在的目录。

答案 1 :(得分:1)

print语句引用$folder变量。

但是open语句引用了一个不存在的$ordner变量。

在脚本开头使用use strict; use warnings;可以轻松找到此类问题。