OTM-CustomMetric: FrameLengthParser.pm

File FrameLengthParser.pm, 362 bytes (added by Prasad Calyam, 8 years ago)
Line 
1sub tshark
2{
3    shift @_;
4    my ($tt, $src, $dst, @fData) = @_;
5        my $value=0;
6        my $num=0;
7        foreach $line(@fData){
8            $num=$num+1;
9                @t2=split(/\t/,$line);
10                $src=$t2[0];
11                $dst=$t2[1];
12                $value=$value+$t2[2];
13        }
14        if($num==0){
15                $value=0;
16        }
17        else{
18                $value=$value/$num;
19        }
20
21    $str="tshark#$tt#$value#$src#$src";
22    return $str;
23
24}