red color under 150Mb/s

git-svn-id: svn://svn.rot13.org/sysadmin-cookbook@165 191e9f34-6774-4a6d-acfc-7664dacd4a2a

diff --git a/recepies/netpipe-tcp/np2graphviz.pl b/recepies/netpipe-tcp/np2graphviz.pl
index e877e6e..59299ff 100755 (executable)
--- a/recepies/netpipe-tcp/np2graphviz.pl
+++ b/recepies/netpipe-tcp/np2graphviz.pl
@@ -45,7 +45,7 @@ join("\n", map {
        my $node = $_;
        my $speed = $graph->{$_}->{speed};
        my $c = 'ff0000';
-       $c = '00ff00' if ( $speed /  100 ) > 1;
+       $c = '00ff00' if ( $speed /  100 ) > 1.5;
        $c = '0000ff' if ( $speed / 1000 ) > 1;
        $c = '8888ff' if ( $speed / 1000 ) > 2;
        my $label = $speed;