Provided by: libnet-frame-simple-perl_1.09-1_all bug


       Net::Frame::Simple - frame crafting made easy


          # We build a TCP SYN
          my $src    = '';
          my $target = '';
          my $port   = 22;

          use Net::Frame::Simple qw($NoUnableToUnpackWarnings $NoModuleNotFoundWarnings);
          use Net::Frame::Layer::IPv4;
          use Net::Frame::Layer::TCP;

          $NoUnableToUnpackWarnings = 1;
          $NoModuleNotFoundWarnings = 1;

          my $ip4 = Net::Frame::Layer::IPv4->new(
             src => $src,
             dst => $target,
          my $tcp = Net::Frame::Layer::TCP->new(
             dst     => $port,
             options => "\x02\x04\x54\x0b",
             payload => 'test',

          my $oSimple = Net::Frame::Simple->new(
             layers => [ $ip4, $tcp ],

          # Now, the frame is ready to be send to the network
          # We open a sender object, and a retriever object
          use Net::Write::Layer3;
          use Net::Frame::Dump::Online;

          my $oWrite = Net::Write::Layer3->new(dst => $target);
          my $oDump  = Net::Frame::Dump::Online->new(dev => $oDevice->dev);

          # We send the frame

          # And finally, waiting for the response
          until ($oDump->timeout) {
             if (my $recv = $oSimple->recv($oDump)) {
                print "RECV:\n".$recv->print."\n";



       This module is part of Net::Frame frame crafting framework. It is totally optional, but
       can make playing with the network far easier.

       Basically, it hides the complexity of frame forging, sending, and receiving, by providing
       helper methods, which will analyze internally how to assemble frames and find responses to

       For example, it will take care of computing lengths and checksums, and matching a response
       frame to the requesting frame.


       raw Where the packed frame will be stored, or used to unpack a raw string taken from the
           network (or elsewhere).

           The frame timestamp.

           We cannot know by which layer a frame begins, so this tells how to start unpacking a
           raw data.

           Sometimes, frames are padded to achieve 60 bytes in length. The padding will be stored
           here, or if you craft a frame, you can manually add your own padding.

           A binary flag stating when a raw frame has been truncated (or not).

           When the recv method is called, and a corresponding reply has been found, it is stored

           This one is an arrayref. It will store all layers to use within the Net::Frame::Simple

       ref This is a hashref that stores all layers. The key is the layer type (example: TCP:
           $oSimple->ref->{TCP}). If the frame contains multiple layers of the same type, only
           the one found at upper level will be kept (in fact, the latest analyzed one, aka


       new (hash)
           Object constructor. You can pass attributes in a hash as a parameter. Also note that
           when you call it with layers attribute set, it will automatically call computeLengths,
           computeChecksums and pack for you. And when you pass raw attribute, it will call
           unpack for you too, building layers and storing them in layers attribute.

       newFromDump (hashref)
           When Net::Frame::Dump next method is called, and there is a frame waiting, it returns
           a hashref with specific values. You can directly use it as a parameter for this
           method, which will create a new Net::Frame::Simple object.

           This one hides the manual hassle of calling computeLengths method for each layers. It
           takes no parameter, it will know internally what to do. You may set the global
           variable $NoComputeLengths to 1 to avoid computing lengths.

           Same as above, but for checksums. you MUST call the previous one before this one. You
           may set the global variable $NoComputeChecksums to 1 to avoid computing checksums.

           Will pack all layers to to raw attribute, ready to be sent to the network.

           Will unpack a raw string from the raw attribute into respective layers. By default, a
           warning will be displayed if unable to unpack the next layer. You may disable this
           message by setting the global variable $NoUnableToUnpackWarnings to 1. Furthermore,
           unpack() will try to load a module and print a warnings in case it is not able to load
           it. You may disable this message by setting the global variable
           $NoModuleNotFoundWarnings to 1.

           These two methods are basically used to increase the speed when using recv method.

       recv (Net::Frame::Dump object)
           When you want to search for the response of your probe, you call it by specifying from
           which Net::Frame::Dump object to search. It then returns a Net::Frame::Simple object
           if a match is found, or undef if not.

       send (Net::Write object)
           Will send to the Net::Write object the raw string describing the Net::Frame::Simple

       reSend (Net::Write object)
           You can also reSend the frame, it will only rewrite it to the network if no reply has
           already been found.

           Prints all layers in human readable format.

           Dumps the raw string in hexadecimal format.


       Net::Write, Net::Frame::Dump


       Patrice <GomoR> Auffret


       Copyright (c) 2006-2017, Patrice <GomoR> Auffret

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