use gnuplot(1)

研究动态的plotting相关工具，今天学了大半天的gnuplot，好不容易捣鼓出一个可以工作的例子：

命令行下执行：
demo.pl | gnuplot

不过这个例子还不是真正的实时动态plotting。

下面是demo.pl的源代码：

#!/usr/bin/perl -w

use strict;
# First, set the standard output to auto-flush

select((select(STDOUT), $| = 1)[0]);


my $offset = 0.0;
print "set terminal png\n";
print "set output \"demo.png\"\n";
print "set xrange [0:50]\n";
print "set yrange [-1:1]\n";
print "plot \"-\" using 1:2 title 'demo' with points\n";
while(1)
{
    print $offset, " ", sin($offset)." \n";
    #print cos($offset)."\n";

    $offset += 0.1;
    if ($offset > 500)
    {
        last;
    }
    #system("sleep 1s") == 0 or last;

}
print "e\n";


本文主要参考了