Histogram improvements

[mirrors/Programs.git] / c / goertzel / histogram.pl

diff --git a/c/goertzel/histogram.pl b/c/goertzel/histogram.pl
index c27f28c6e8da08f39d757fda0a325c23ccbbc567..0a8ccb37ba437a1a34712d4fdbd59386b82e92d5 100755 (executable)
--- a/c/goertzel/histogram.pl
+++ b/c/goertzel/histogram.pl
@@ -29,7 +29,7 @@ while(<STDIN>) {
        my $i=0;
        print "\033[H";
        foreach my $i (1..$#values) {
-               print bar($values[$i],10,sprintf("%8s ",trim($header[$i])))."\n";
+               print bar($values[$i],50,sprintf("%8s ",trim($header[$i])))."\n";
        }
        print "Time: ".$values[0]."                   \n";
        print "                           \n";