perl - GD::Graph::pie 的值的铭文

Question

我找不到任何方法如何在饼图的各个部分上对值进行签名。

Answer 1

只需将值添加到@params数组中的数据即可。

my @params = qw[param1 param2 param3];
my @values = qw[    45     25     30];

$params[$_] = "$params[$_] ($values[$_])" for 0 .. $#params;

my @data   = (\@params, \@values);