least_delay now in ms in gapsum record

build.sh

@@ -8,7 +8,7 @@ apt-get update
 apt-get -y upgrade
 
 package="mp-rude"
-version="1.3.14"
+version="1.3.15"
 
 target="${package}_${version}_all"
 

mp-rude/usr/share/mp-rude/qstream-gap-ana

@@ -19,7 +19,7 @@ use constant JAN_1970 => 0x83aa7e80;
 # use LWP::Protocol::https;
 
 # date --date 'jan 1 2000' +%s
-$version="0.1.1";
+$version="0.1.2";
 $min_tx=946681200;
 $max_tx=1893452400; # 2030-01-01
 $maxseqreorder=1000; # 
@@ -45,8 +45,6 @@ my %jitter_values=(); # last jitter values reported
 my %mindelay; # minimum delay last slep
 my %minseq; # minimum delay last slep
 
-my %mindelay; # minimum delay last slep
-
 $usage="$0 '[-title text] [-minloss n] [-win n] [-graph file] [max-small-graphs n]  [-outdir dir] [-head|-rhead] [-id id] [-names file]  [-json file] [-v] [-version] [-esmond url] [file]...
 Analyse gaps in a crude packet log
   - output a list of statistical qos parameters as text or json
@@ -289,7 +287,7 @@ sub emit_summary_json{
 	    "duplicates" => $dupl{$id} * 1  || 0, 
 	    "reordered" => $reorder{$id} * 1  || 0,
 		"dTTL" => $dttl_count{$id} * 1  || 0,
-		"least_delay" => $least_delay{$id},
+		"least_delay" => sprintf("%.3f", $least_delay{$id}*1000),
 	    "down_ppm" => sprintf ( "%.3f", 10**6 * ($small_time{$id} + $big_time{$id}) / $duration{$id} ) * 1.0 # ppm
 	};
 	foreach $gap_type( keys %$gap_limit ){ # note dropped gaps