Lisa Bates wrote:
!Once I know the contents of a PDS library, the next obvious task is to
read
!one of those members.
For which you can use the mvsopen() function.
!I can't tell if reading a member from a PDS libray using Stdio module is
!one of the supported functions.
It is, via mvsopen().
!Intutively, I thought it would be....but I don't see any samples, and if
it
!supported, I haven't been able to
!figure out the syntax.
!
!Can you clarify?
Depending on the record format (recfm=?) you might be able to use
something as simple as the following which give a fully qualified
example name (not necessarily using the default HLQ):
my $MEMBER_HANDLE = mvsopen("//'PDS.NAME(MEMBER)'","r")
or die "Could not open MEMBER for read access: $!";
my $record = <$MEMBER_HANDLE>;
# process $record here.
You may need to also refer to the C Run time library documentation
(or stdio_cookbook.pod) for fopen() and its discussion of:
"acc=", "blksize=$number", "byteseek", "lrecl=", "recfm=",
"type=", "asis", "password=$secret", "noseek" and what they all
entail.
There may be some sample member reading tests in the test suite
for the module.
I hope that helps.
Peter Prymmer
