: 書上了例子(我存檔成4.pl)：
: use GD::Graph::bars3d;
use lib "/sw/lib/perl5/5.8.6/"; #""內請自行改成你GD Module的資料夾
: my $graph=GD::Graph::bars3d->new(800,600);
: my @files=</var/log/maillog.*.bz2>;
: my $image=$graph->plot([[map/(\d+)\./g,@files],[map -s,@files],])
: or die $graph->error;
: open my $fh,'>','3.png'ordie $!;
binmode($image); #binmode在windows下一定要加，()內放你的變數
: print $fh $image->png;
: print "@ING\n";
試看看
我的經驗是源自Bioperl的Graphic module希望對你有幫助
--
★ミ ζ
○_.
/(╯
【今晚的天空有一顆流星劃過 在預言著什麼】|>
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.64.65.81