You can answer with any programming language

O.K. Then I choose Perl.

#!/usr/bin/perl
use GUI::Testing;
$wireshark_bin = which wireshark;
chomp($wireshark_bin);
$capture_file  = 'input.pcap';
if ($pid = fork()) {
parent process ….
wait while Wireshark is starting …
sleep(30);
get a GUI handle for Wireshark
$ws_handle = get_gui_handle($wireshark_bin);
get a handle for the IO Graph
$io_graph = $ws_handle.menu("Statistics::IO Graph");
$io_graph.tick_interval = "1";
$io_graph.pixel_per_tick = "5";
$io_graph.y_axis_unit = "packets/tick";
$io_graph.y_axis_scale = "auto";
set the display filter for graph 1.
Alternative filter: tcp.stream eq 2
Alternative filter: tcp.port eq 80
$io_graph.graph_1.filter = "tcp";
$io_graph.graph_1.style = "line";
$io_graph.graph_1.redraw();
$data = $io_graph.copy_data();
analyze_data($data);
} else {
child process
system("$wireshark_bin -nr $capture_file");
}
sub analyze_data {
my $data = shift;
print STDERR "Please write your own code to analyze the data\n";
print STDERR "like calculation of mean or median values\n";
}

Hint: ‘Listen’ to the code …..

Regards
Kurt