/Shell/Bash/Tcp traffic analysis linux command line mb per second

Tcp traffic analysis linux command line mb per second

#!/usr/bin/perl
# traffic analysis script using tcpdump
use strict;
use warnings;
use Time::HiRes;

my $reporting_interval = 10.0; # seconds
my $bytes_this_interval = 0;
my $start_time = [Time::HiRes::gettimeofday()];

STDOUT->autoflush(1);

while (<>) {
  if (/ length (\d+):/) {
    $bytes_this_interval += $1;
    my $elapsed_seconds = Time::HiRes::tv_interval($start_time);
    if ($elapsed_seconds > $reporting_interval) {
       my $bps = $bytes_this_interval / $elapsed_seconds;
       printf "%02d:%02d:%02d %10.2f Bps\n", (localtime())[2,1,0],$bps;
       $start_time = [Time::HiRes::gettimeofday()];
       $bytes_this_interval = 0;
    }
  }
}

Source: superuser.com

Similar codes

0 vote178 views1 answer
Night light ubuntu 20.04
Shell/Bash
1 vote207 views1 answer
Samtools extract sequence from bam file
Shell/Bash
34 votes200 views6 answers
Python install dotenv
Shell/Bash
1 vote153 views1 answer
Npm get installed version
Shell/Bash
0 vote181 views2 answers
Conky manager
Shell/Bash
5 votes330 views4 answers
Install jenkins ubuntu
Shell/Bash
0 vote157 views1 answer
Postgresql not connected docker
Shell/Bash
2 votes171 views1 answer
Bash float operation
Shell/Bash
5 votes169 views1 answer
Rails g migration add columns
Shell/Bash
0 vote167 views1 answer
Job('DSL-Tutorial-1-Test') { scm { git('git://github.com/quidryan/aws-sdk-test.git') } triggers { scm('H/15 * * * *') } steps { maven('-e clean test') } }
Shell/Bash