The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

IPDevice::Allnet::ALL4000 - provides an interface to ALL4000 ethernet sensormeter

SYNOPSIS

  use IPDevice::Allnet::ALL4000
  my $all4000 = new IPDevice::Allnet::ALL4000(
                        HOST     => $host,
                        USERNAME => $username,
                        PASSWORD => $password,
                        PORT     => '80' );

All variables are necessary.

DESCRIPTION

This package provides an interface to ALL4000 ethernet sensormeter device

METHODS

new

  my $all4000 = new IPDevice::Allnet::ALL4000(
                        HOST     => $host,
                        USERNAME => $username,
                        PASSWORD => $password,
                        PORT     => '80' );

Makes a new object ready to make requests from the ALL4000 ethernet sensormeter

getData

  $data = $all4000->getData();

Makes a new request to the server and returns an anonymous hash of all the data points.

lastData

  $data = $all4000->lastData();

If a getData request was made before, this will return the last data set, otherwise undef will be returned.

AUTHOR

Robin Clarke rcl@cpan.org

LASTMOD

28.01.2009

CREATED

23.01.2009