Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?

Re^5: help on this code below

by aaron_baugher (Curate)
on Oct 28, 2011 at 18:13 UTC ( #934466=note: print w/ replies, xml ) Need Help??

in reply to Re^4: help on this code below
in thread help on this code below

It might help if you stop moving the goalposts. First you're having trouble opening a file, now you're trying to rename one. One problem at a time. We still haven't seen the code that opens the file, but make sure it checks for errors, something like this

my $puserfile = "$SAVE_DIRECTORY/$puser"; open my $puserfn, '>', $puserfile or die "Cannot open $puserfile for w +riting: $!";

That will try to open the file, and on failure report the filename and the reason to the error log. If you don't have easy access to the error log, change 'die' to 'print' to at least see it in your browser, or look at's ability to report all errors to the browser.

Debugging isn't that complicated, but you have to think through what's happening. Like I said before, check what errors are being generated, and make sure your code checks for them. If your code is supposed to create a file and it's not happening, error-check that part of the code. Don't just try something different. Make sure the filename it's trying to open is okay -- the full filename; don't assume any part of it is what you think it is. If it's a relative pathname, check the cwd at that point to make sure that's correct too. Check everything, and use error checking. Let Perl tell you what the problem is.

Comment on Re^5: help on this code below
Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://934466]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (6)
As of 2016-04-29 21:27 GMT
Find Nodes?
    Voting Booth?
    :nehw tseb si esrever ni gnitirW

    Results (441 votes). Check out past polls.