# # $Id: Type.pm 1640 2009-11-09 17:58:27Z gomor $ # package Net::Packet::CDP::Type; use strict; use warnings; require Net::Packet::Layer4; our @ISA = qw(Net::Packet::Layer4); our @AS = qw( type length ); __PACKAGE__->cgBuildIndices; __PACKAGE__->cgBuildAccessorsScalar(\@AS); no strict 'vars'; sub getLength { shift->[$__length] } 1; __END__ =head1 NAME Net::Packet::CDP::Type - base class for Cisco Discovery Protocol extension headers =head1 DESCRIPTION This is the base class for B various extension headers. For other attributes and methods, see B and B. It just provides those extension headers with inheritable attributes and methods. =head1 ATTRIBUTES =over 4 =item B - 16 bits =item B - 16 bits =back =head1 CONSTANTS See B CONSTANTS. =over 4 =back =head1 AUTHOR Patrice EGomoRE Auffret =head1 COPYRIGHT AND LICENSE Copyright (c) 2004-2009, Patrice EGomoRE Auffret You may distribute this module under the terms of the Artistic license. See LICENSE.Artistic file in the source distribution archive. =head1 RELATED MODULES L, L, L =cut