Select Code to Download

sub new {
...
   return $self;
}

sub setInjectMode {
...
   return 1;
}

$VAR1 = bless( [
                 \152150320,
...
                 undef,
                 \152168944
               ], 'Net::Lorcon2' );

   # $self->driver( $drv ) ;
   my $context = lorcon_create($self->interface, $drv); #_drv