Perl-对象数组

Noob的问题在这里。

我确定答案将是创建对象，并将其存储在数组中，但是我想看看是否有更简单的方法。

在JSON表示法中，我可以创建一个对象数组，如下所示:

[
  { width : 100, height : 50 },
  { width : 90, height : 30 },
  { width : 30, height : 10 }
]

漂亮又简单。不争辩。

我知道Perl不是JS，但是有没有更简单的方法来复制对象数组，然后创建一个新的“类”，新对象并将它们插入数组中？

我猜这将使JS提供的对象文字类型表示法成为可能。

或者，是否存在另一种存储两个值的方法，例如上面的方法？我想我可能只有两个数组，每个数组都有标量值，但这看起来很丑……但是比创建一个单独的类和所有这些废话要容易得多。如果我正在编写Java之类的东西，那没有问题，但是当我只编写一个小脚本时，我不想被所有的事情所困扰。

最佳答案

这是一个开始。 @list数组的每个元素都是对键为“width”和“height”的哈希的引用。

#!/usr/bin/perl

use strict;
use warnings;

my @list = (
    { width => 100, height => 50 },
    { width => 90, height => 30 },
    { width => 30, height => 10 }
);

foreach my $elem (@list) {
    print "width=$elem->{width}, height=$elem->{height}\n";
}

关于Perl-对象数组，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/7002046/