Question

好吧，我正在尝试在Perl中创建一个数组数组，以便与GD :: Graph模块一起使用。我无法弄清楚为什么以下不是GD :: Graph的有效数组数组。

my @t = (1, 2, 3, 4);
my @g = (2, 4, 5, 6);
my @data = (@t, @g);

我也尝试过如下构建数据，它仍然不喜欢它。

my @data;
push @data, @t;
push @data, @g;

我希望将我的值保存在单独的数组中，然后将它们组合起来用于GD :: Graph，因为这是我发现的最简单的方法，即使它很难看。我如何创建一个有效的结构，用于动态创建的GD :: Graph？

它在这里抱怨。

my $gd = $graph->plot(\@data) or die $graph->error;

Answer 1

看起来@data只是一个包含8个元素的单维数组。

您可以使用匿名数组构造函数[]

来定义数组数组

v1

Answer 2

对我来说，使用数组引用做了诀窍

my @t = (1, 2, 3, 4);
my @g = (2, 4, 5, 6);
my @data = (\@t, \@g);

并绘制图表与示例：

my $graph = new GD::Graph::lines(800,600 );
my $gd = $graph->plot( \@data );
open OUT, ">","whatever.png" or die "Couldn't open for output: $!";
binmode(OUT);
print OUT $gd->png( );
close OUT;

为GD :: Graph创建数组数组

2 个答案: