/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 vote301 views2 answers
Install tomcat on mac brew
Shell/Bash
2 votes273 views2 answers
Install nginx ubuntu 20.04
Shell/Bash
26 votes308 views10 answers
Bootstrap
Shell/Bash
22 votes301 views6 answers
Use nvm to install latest node
Shell/Bash
1 vote306 views1 answer
Powershell beeb
Shell/Bash
-1 vote267 views1 answer
How to send email with body and attachment in unix
Shell/Bash
0 vote362 views1 answer
Pwa install
Shell/Bash
4 votes308 views2 answers
List all node versions mac
Shell/Bash
0 vote321 views1 answer
Find syntax unix
Shell/Bash
0 vote316 views2 answers
Tail and watch directory linux
Shell/Bash