/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 vote222 views1 answer
How to define a variable in bashrc
Shell/Bash
19 votes260 views6 answers
Rename a git branch
Shell/Bash
1 vote206 views1 answer
Transfer files to cluster
Shell/Bash
1 vote188 views1 answer
Install gromit-mpx to mint
Shell/Bash
4 votes253 views2 answers
Install torch anaconda
Shell/Bash
1 vote256 views1 answer
Installing mate desktop on ubuntu 18.04
Shell/Bash
0 vote195 views1 answer
Command split by delimiter
Shell/Bash
0 vote153 views1 answer
Vmware can't edit vm ram
Shell/Bash
0 vote183 views1 answer
Bash read command examples
Shell/Bash
10 votes197 views6 answers
Zsh: command not found: nvm
Shell/Bash