Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things

Re: perl can find the file but can not open the file

by graff (Chancellor)
on Mar 09, 2013 at 19:42 UTC ( #1022618=note: print w/replies, xml ) Need Help??

in reply to perl can find the file but can not open the file

You're using quotes where you don't need to, and as indicated above, the single-quotes in the open statement are not only unnecessary, but cause the "file not found" error. Try it like this:
die "$file not found\n" unless ( -e $file ); open( FH0, $file ) or die "Unable to open $file: $!\n"; ...
In that version, I took advantage of the fact that "open" assumes "for reading" as a default; if the file name returns "true" with '-e', then it exists. But there might still be issues with being able to read it. If '-r' returns true for the file, then it's virtually certain that "open" for reading will succeed.

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (3)
As of 2018-01-20 02:03 GMT
Find Nodes?
    Voting Booth?
    How did you see in the new year?

    Results (226 votes). Check out past polls.