帮看看这个GD::Graph绘图例子[未解决]

帮看看这个GD::Graph绘图例子[未解决]

各位:大致perldoc GD::Graph了一下,GD::Graph可以画lines,bars等图形,不知道该模块是否可以画波形图,随时间变化实时显示?比如WINXP的任务管理器动态显示的CPU使用率波形图。自己想尝试画一个ping值的实时显示变化图。
GD::Graph or RRDTool...?哪个更容易,更普遍实现?请各位给点意见。谢谢

--算了,据说那是GUI的范畴!想过把瘾都难啊...

GD的功能比较阳春...要进阶一点的..可以用ImageMagick...
呵呵,老大,这个我会研究下的。
---------------------
另:perldoc GD::Graph中有个绘图的example:
#!/usr/bin/perl

use GD::Graph::lines;
@data = (
    [ "1st", "2nd", "3rd", "4th", "5th", "6th", "7th", "8th", "9th" ],
    [ 1,     2,     5,     6,     3,     1.5,   1,     3,     4 ],
    [ sort { $a <=> $b } ( 1, 2, 5, 6, 3, 1.5, 1, 3, 4 ) ]
);
my $graph = GD::Graph::lines->new( 400, 300 );
$graph->set(
    x_label       => 'X Label',
    y_label       => 'Y label',
    title         => 'Some simple graph',
    y_max_value   => 8,
    y_tick_number => 8,
    y_label_skip  => 2
) or die $graph->error;
my $gd = $graph->plot( \@data ) or die $graph->error;
open( IMG, '>file.gif' ) or die $!;
binmode IMG;
print IMG $gd->gif;
close IMG;


QUOTE:
mm.txt内容如下:
AB    12
KI    20
IO    33
BH    88
/     28
AK    66
........

---------------------
我想仿照上面的example绘图,X轴为mm.txt的第一列数值,Y轴为mm.txt第二列数值,请问现在这个@data该如何写?
open FH, "<mm.txt" || die "$!";
my ( $lable_x, $lable_y );
while (<FH>) {
    s/\s+$//;
    if (/(.*)\s+(\d+)/) {
        push @lable_x, $1;
        push @lable_y, $2;
    }
}

这个该如何利用上呢?
不会要和example类似,手动输入吧:
@data=(
      [ "AB", "KI", "IO", ......],
      [12,20,33......]
)
请大家指教,多谢!
------------------会的兄弟帮看看吧~

有劳各位,偶还没有解决!