X-Authentication-Warning: delorie.com: mail set sender to djgpp-bounces using -f
NNTP-Posting-Date: Thu, 17 Apr 2008 13:36:27 -0500
From: "Robbie Hatley" <see DOT my DOT signature AT for DOT my DOT email DOT address>
Newsgroups: comp.lang.perl.misc,comp.os.msdos.djgpp
References: <zd6dnbRZ8J5AdJvVnZ2dnUVZ_rignZ2d AT giganews DOT com> <Xns9A8321CB0C79asu1cornelledu AT 127 DOT 0 DOT 0 DOT 1> <YNqdnXMJMcgtkJrVnZ2dnUVZ_qOknZ2d AT giganews DOT com> <Xns9A836B4AECDF7asu1cornelledu AT 127 DOT 0 DOT 0 DOT 1>
Subject: Re: Perldoc error: "Could not create temp file"
Date: Thu, 17 Apr 2008 11:36:17 -0700
Organization: Tustin Free Zone
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1914
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1914
Message-ID: <CuSdnZLhluU2BZrVnZ2dnUVZ_oaonZ2d@giganews.com>
Lines: 81
X-Usenet-Provider: http://www.giganews.com
X-Trace: sv3-BEqnORjNVUdLcBC2NmZG0z0lPk1eu1Dm6kf07fzoty5Zbm1lIo7FBL1F/RclGB1wJBXheRa2UyXWNIE!GDEMnrcK5a2ZelWCoSModZ4uEM2uqZfrIh40EFwKVwDiYHXbsxku9ROHnpxKlArop35+WJ7czw==
X-Complaints-To: abuse AT giganews DOT com
X-DMCA-Notifications: http://www.giganews.com/info/dmca.html
X-Abuse-and-DMCA-Info: Please be sure to forward a copy of ALL headers
X-Abuse-and-DMCA-Info: Otherwise we will be unable to process your complaint properly
X-Postfilter: 1.3.39
To: djgpp AT delorie DOT com
DJ-Gateway: from newsgroup comp.os.msdos.djgpp
Reply-To: djgpp AT delorie DOT com


"A. Sinan Unur" wrote:

> "Robbie Hatley" <lonewolf AT well DOT com> wrote in
> news:YNqdnXMJMcgtkJrVnZ2dnUVZ_qOknZ2d AT giganews DOT com:
>
> >
> > "A. Sinan Unur" wrote:
> >
> >> "Robbie Hatley" wrote:
> >>
> >> > wd=C:\djgpp\bin
> >> > %bash
> >> > bash-2.04$ perldoc perl
> >> > Error in tempfile() using c:/djgpp/tmp/XXXXXXXXXX: Could not
> >> > create temp file c: /djgpp/tmp/zkQ06tqlcH: Invalid argument
> >> > (EINVAL) at /dev/env/DJDIR/lib/perl5/Pod /Perldoc.pm line 1483
> >> > bash-2.04$ exit
> >> > exit
> >> > wd=C:\djgpp\bin
> >> > %perl perldoc perl
> >> > Error in tempfile() using C:/TEMP/XXXXXXXXXX: Could not create
> >> > temp file C:/TEMP /0mfgo64w9W: Invalid argument (EINVAL) at
> >> > /dev/env/DJDIR/lib/perl5/Pod/Perldoc.p m line 1483
> >> > wd=C:\djgpp\bin
> >> > %
> >>
> >> You have a permissions problem. Either c:\djgpp\tmp does not
> >> exist or you do not have permissions to write there. Same applies
> >> to C:\TEMP
> >
> ...
>
> > First of all, in that situation, the error is different,
> > and says "Permission Denied" (EACESS or EPERM) not
> > "Invalid Argument (EINVAL)".
>
> Looking more carefully at the error message you posted, note that
> the actual error is coming from File::Temp::_gettemp.
>
> $open_success = sysopen($fh, $path, $flags, 0600);
>
> is returning the error condition. So, the invalid value being passed
> is either in $flags or the umask. I suspect $flags.
>
> On a hunch, could you check what the following script prints:
>
> #!/usr/bin/perl
>
> use strict;
> use warnings;
>
> use Fcntl;
>
> my $EXLOCK = eval {
>     local $SIG{__DIE__} = sub {};
>     local $SIG{__WARN__} = sub {};
>     &Fcntl::O_EXLOCK();
> };
>
> print "'$EXLOCK'\n";
>
> __END__

Hmmm.  That gives:

cwd = C:\
$p einval.p
Use of uninitialized value in concatenation (.) or string at
C:\scripts\einval.p line 14.
''
So it's just printing '', since $EXLOCK is uninitialized.
Whatever that indicates.  I'm afraid its going way over my head.

-- 
Cheers,
Robbie Hatley
lonewolf aatt well dott com
www dott well dott com slant user slant lonewolf slant