Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked

Re^4: chmod in perl

by atcroft (Abbot)
on Mar 11, 2011 at 07:51 UTC ( #892604=note: print w/replies, xml ) Need Help??

in reply to Re^3: chmod in perl
in thread chmod in perl

Actually, I did. I fixed it, and put a note at the bottom to indicate it had been updated, but have no idea if the OP has seen it or tried with the missing semicolon in place.

Replies are listed 'Best First'.
Re^5: chmod in perl
by Anonymous Monk on Mar 11, 2011 at 09:19 UTC

    The problem with the below code is if the file doesnot exist,you will get an error "No such file or directory at line 135

    my $filename = q{deletefiles.txt}; chmod 0777, $filename or die $!; open my $OUTPUT, q{+>}, $filename or die $!;

      Either ignore that error,

      my $filename = q{deletefiles.txt}; chmod 0777, $filename or $!{ENOENT} or die $!; open my $OUTPUT, q{+>}, $filename or die $!;

      Or change the permissions after creating the file.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://892604]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (7)
As of 2018-06-20 06:15 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (116 votes). Check out past polls.