Front page | perl.vmsperl |
Postings from January 2002
Under the same conditions (BYPASS on, so DCL can read it, but I don't otherwise have access): $ perl -e "$z = opendir($dh,'[.temp]'); print qq([$!][$^E][$z]\n)" [permission denied][%RMS-E-PRV, insufficient privilege or file protection violation][] / Tom P.S. VMS Version V7.2-2 -----Original Message----- From: Brad Hughes [mailto:brad@tgsmc.com] Sent: Tuesday, January 29, 2002 4:45 PM To: Tom Edelson Cc: 'vmsperl@perl.org' Subject: Re: Privileges won't let me "opendir"? Tom Edelson wrote: [...] > If I give myself BYPASS privilege, now I can read the directory through DCL, > but opendir still doesn't work: > > $ SET PROCESS /PRIVILEGE=BYPASS > > $ DIR [.TEMP] > > Directory $1$DUA330:[HOSTVAX.TOEDEL.SCRATCH.TEMP] > > FOO.TXT;1 > > Total of 1 file. > > $ perl -e "print ""<"", opendir ($dh, ""[.temp]""), "">"" " > <> I get <1> in this case, also with v5.6.1, so there must be more going on. What do you get from: $ perl -e "$z = opendir($dh,'[.temp]'); print qq([$!][$^E][$z]\n)" ? BradThread Next