my $sniffer = Sniffer::HTTP->new(
    callbacks => {       
       request  => sub {
          my ($req,$conn) = @_;