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

NAME

Net::Frame::Layer::MPLS - Multiprotocol Label Switching layer object

SYNOPSIS

   use Net::Frame::Simple;
   use Net::Frame::Layer::MPLS qw(:consts);

   my $layer = Net::Frame::Layer::MPLS->new(
      label => 0,
      tc    => 0,
      s     => NF_MPLS_S_YES,
      ttl   => 255,
   );

   #
   # Read a raw layer
   #

   my $layer = Net::Frame::Layer::MPLS->new(raw => $raw);

   print $layer->print."\n";
   print 'PAYLOAD: '.unpack('H*', $layer->payload)."\n"
      if $layer->payload;

DESCRIPTION

This modules implements the encoding and decoding of the MPLS layer.

RFC: ftp://ftp.rfc-editor.org/in-notes/rfc3031.txt

See also Net::Frame::Layer for other attributes and methods.

ATTRIBUTES

label

MPLS label.

tc

MPLS traffic class.

s

Bottom of stack.

ttl

Time to live.

The following are inherited attributes. See Net::Frame::Layer for more information.

raw
payload
nextLayer

METHODS

new
new (hash)

Object constructor. You can pass attributes that will overwrite default ones. See SYNOPSIS for default values.

The following are inherited methods. Some of them may be overriden in this layer, and some others may not be meaningful in this layer. See Net::Frame::Layer for more information.

layer
computeLengths
pack
unpack
encapsulate
getLength
getPayloadLength
print
dump

CONSTANTS

Load them: use Net::Frame::Layer::MPLS qw(:consts);

NF_MPLS_S_NO
NF_MPLS_S_YES

Bottom of stack yes / no.

SEE ALSO

Net::Frame::Layer

AUTHOR

Michael Vincent

COPYRIGHT AND LICENSE

Copyright (c) 2017, Michael Vincent

You may distribute this module under the terms of the Artistic license. See LICENSE.Artistic file in the source distribution archive.