Failed to create a file

[Anonymous Monk]

Trying to create a file in temp folder using the below line of code,always get "Failed to create cfg".what am I dong wrong?

open(CFG, "C:\\TEMP\\cfg") || die "Failed to create cfg";

[wind]

Read the documentation for open. You're currently trying to open for reading instead of writing.

Also, give yourself all the debugging information possible in your die statements. It would've told you what was wrong.

my $file = "C:\\TEMP\\cfg";
open CFG, '>', $file or die "failed to open $file: $!";

[ikegami]

File::Temp

[Khen1950fx]

I don't have Windows, so this is untested:);

#!perl

use strict;
use warnings;

open STDOUT, '>', 'C:\\TEMP\\cfg'
    or die "Failed to create cfg";
print "Does this work?\n";
close STDOUT;

[MidLifeXis]

Slightly off topic, but related to coding style of sorts.

open(CFG, "C:\\TEMP\\cfg") || die "Failed to create cfg";

You have included the parens in your call to open, which allows the ... || die ... to work as expected. If you leave off the parens - open CFG, "C:\\TEMP\\cfg" || die "Failed to create cfg";, this will give you the wrong results. Having stubbed my toe on this many times, I have made it my habit to use action or die instead of action || die.

[thezip]

An even alternativer solution to this is to use pjf's great autodie module, which avoids the issue altogether...

[tchrist]

Having stubbed my toe on this many times, I have made it my habit to use action or die instead of action || die.

An alternative reaction is to always use parens on function calls: some_function(ARGS) || die. The advantage of this strategy is that it improves readability, plus now you don’t have to memorize a bunch of confusing and conflicting precedence rules.

[moritz]

I'm curious, which precedence rules are "conflicting"?

Also I find the rule "logical operators that are spelled out as words have loose precedence" not too hard to remember.

[jellisii2]

mkdir('C:/TEMP/cfg') or die 'Could not create folder';