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

Reply via email to