Hi fellow mainframers, this is only in a very early stage and only useful for the BS2000 port, but I'd like to present it nonetheless, the first BS2000 specific Perl module. It gives you access to LMS libraries from Perl (using the LMS C subroutine interface). At the moment you only can access the table of contents and add and extract elements, but there's more to come in the (not so near, as my time for Perl in the company is limited) future.
I compiled and tested it with a static Perl 5.8.1 RC4, but it should work with other versions newer than 5.6.0 as well. As I don't have that much experience with the XS interface of Perl there might be one or two memory leaks lurking in the XS part of the module, so beware using this for production relevant machines. You can find the module on CPAN: http://www.cpan.org/modules/by-authors/id/D/DO/DORNER/ See the README for more details, especially how to install the module. And of course the module uses POD, I think more than half of the .pm file is documentation. The PerlIO encoding/decoding in combination with using different (EBCDIC and ASCII) filesystems in the Posix subsystem is not really tested yet (working with EBCDIC files or using ':raw' enconding seems OK). The LMS libraries themselves are accessed raw (without PerlIO). Regards, Thomas Dorner ________________________________________ Thomas Dorner Amadeus Germany GmbH, General Services & Projects (D-G) E-Mail: [EMAIL PROTECTED]
