Select Code to Download

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

print $req->uri;

$self = bless( {
...
          stale_connection => $self->{stale_connection},
          timeout          => 300
        );