use strict;
use warnings;

my $interface = 'wlo1';
my $driver    = 'madwifing';

use Net::Lorcon2 qw(:subs);

my $lorcon = Net::Lorcon2->new(
   interface => $interface,
   driver    => $driver,
);

$lorcon->setInjectMode;