NAME

Net::TL1::Alcatel - Perl extension for managing Alcatel network devices using TL1

SYNOPSIS

use Net::TL1::Alcatel;

$obj = new Net::TL1::Alcatel ({Host => $host, Debug => [ 0 | 1 ],
                              Port => $port});

$obj->Login ({Target => $target, User => $username,
              Password => $password, ctag => $ctag});
$obj->Logout ({Target => $target});
$obj->Execute($cmd);

$ctag = $obj->rtrvxdsl({ctag => $ctag});
$ctag = $obj->reptopstatxlnecom({ctag => $ctag});
$ctag = $obj->reptopstatxbearer({ctag => $ctag});
$ctag = $obj->reptopstatxline({ctag => $ctag});

$obj->is_error($ctag);
$obj->ParseRaw;
$obj->ParseHeader;
$obj->ParseBody;
$obj->ParseSimpleOutputLines($ctag);
$obj->ParseCompoundOutputLines($ctag);

$obj->get_hashref;
$obj->get_hashref($ctag);

$obj->dumpraw;
$obj->dumphash;
$obj->dumphash($ctag);

$obj->close;

DESCRIPTION

Transaction Language 1 is a configuration interface to network devices used in public networks. Through its very structured but human-readable interface it is very suitable to provide the glue for netwerk device <-> OSS integration.

The Net::TL1 module provides an interface to the sometimes arcane TL1 commands and parses the output of these commands for easy processing in scripts.

At this time the support for the different commands and features is quite limited. Not all the required commands are supported and neither is alarm processing.

REQUIRES

Net::Telnet

EXPORT

(none)

AUTHOR

Steven Hessing, <stevenh@xsmail.com>

SEE ALSO

http://www.tl1.com/

COPYRIGHT AND LICENSE

Copyright (c) 2005, Steven Hessing. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.