RE: Checking to see if file exists.

2008-07-29 Thread tvadnais
se pgp can only be run by root. Thank you, Tim -Original Message- From: Mr. Shawn H. Corey [mailto:[EMAIL PROTECTED] Sent: Tuesday, July 29, 2008 7:39 PM To: [EMAIL PROTECTED] Cc: beginners@perl.org Subject: RE: Checking to see if file exists. On Tue, 2008-07-29 at 19:06 -0700, tvadnais

RE: Checking to see if file exists.

2008-07-29 Thread tvadnais
e), (-e "F0715PAY.TXT") <--- This is the only one that worked. Here is the true code if that helps: ... Thanks, Tim -Original Message- From: tvadnais [mailto:[EMAIL PROTECTED] Sent: Tuesday, July 29, 2008 7:00 PM To: beginners@perl.org Subject: RE: Checking to see if

RE: Checking to see if file exists.

2008-07-29 Thread tvadnais
he call to PGP failed on file: $file\n"; } } } -Original Message- From: Kenneth Wolcott [mailto:[EMAIL PROTECTED] Sent: Tuesday, July 29, 2008 5:38 PM To: beginners@perl.org Subject: Re: Checking to see if file exists. On Tue, Jul 29, 2008 at 2:32 PM, tvadn

Checking to see if file exists.

2008-07-29 Thread tvadnais
I am totally confounded by what appears to be a bug in the "does file exist" functionality. Here is the code as it stands now: my $tmpfile = substr ($file, 0, index($file, ".pgp")); print cwd(); ## debug code: to make sure we're in the correct directory chomp($tmpfile); ## debug code