The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
    AIX::ODM - A Perl module for retrieving IBM AIX ODM information

SYNOPSIS

      use AIX::ODM;
  
      my %odm = odm_dump('C|P');
      while ( ($ndx1, $lev2) = each %odm ) {
        while ( ($ndx2, $val) = each %$lev2 ) {
            print "odm{${ndx1}}{${ndx2}} = ${odm{${ndx1}}{${ndx2}}}\n";
        }
      }

      my %dev = odm_classes('C|P');
      foreach ${devname} ( keys %dev ) {
        print "dev{${devname}} = ${dev{${devname}}}\n";
      }

      my %attribs = odm_attributes(${dev{'devname'}};
      foreach ${attrname} ( keys %attribs ) {
        print "attribs{${attrname}} = ${attribs{${attrname}}}\n";
      }

      my ${devclass} = odm_class('C|P',${dev{'devname'});
      my ${devsubcl} = odm_subclass('C|P',${dev{'devname'});

  
DESCRIPTION

    This module provides a Perl interface for accessing ODM information
    about an RS/6000 / pSeries machine running the AIX operating system.
    It makes available several functions, which return hashes of values
    containing device information and their attributes.

    The syntax examples shown above as 'C|P' should be read as
    "C" OR "P", meaning the argument should consist of a single
    quoted letter "C" or "P", but NOT both.

VERSION
    1.0.2 (released 2004-09-15)

BUGS
    No bugs are known at this time.

TO-DO

AUTHOR
      Dana French
      <mailto:dfrench@mtxia.com>
      <http://www.mtxia.com>
  
COPYRIGHT/LICENSE
    Copyright (c) 2004, Dana French. This module is free software. It
    may be used, redistributed, and/or modified under the terms of the Perl
    Artistic License.