This should be a no-brainer, but I'm a bit short on tuits... If no one else shouts, I'll whimper...
Carl -----Original Message----- From: Craig A. Berry [mailto:[EMAIL PROTECTED]] Sent: Tuesday, September 03, 2002 10:53 PM To: Thomas R Wyant_III Cc: [EMAIL PROTECTED] Subject: Re: Perl vs. DCL (was RE: Set Default not Working) At 5:07 PM -0400 9/3/02, Thomas R Wyant_III wrote: >* Perl is still missing a few things that DCL will do. > >An example of the last item is the functionality of F$FILE_ATTRIBUTES. >There is to my knowledge no way to get this information into Perl other >than spawning a subprocess, e.g. $val = `write sys\$output >f\$file_attribute ($file, $attr)` There are some things available from stat(), but you're right, there is no general access to the FAB that I'm aware of. This should be a fairly straightforward XS implementation for anyone who's been dying to try one of those. I'm not sure where the appropriate spot in the namespace is; we could perhaps add it to VMS::FileUtils, or perhaps it should just be under VMS::File. So we'd have VMS::File->attribute VMS::File->attributes Either should take a file name or a Perl filehandle. The first should return a single value given a single attribute name. The second should return a status and fill in a hash containing all values. Just thinking out loud . . . . -- ________________________________________ Craig A. Berry mailto:[EMAIL PROTECTED] "... getting out of a sonnet is much more difficult than getting in." Brad Leithauser
