perl数组作为种的成员变量

perl数组作为类的成员变量
package Cocoa;
$name;
$location;
@nums;
$value;
...
请问可不可以将数组作为类的成员变量，如果能的话，该怎么定义，怎么赋值和使用

[解决办法]
你得先搞清perl中怎么定义类：

Perl code

use strict;use warnings;package Test;sub new{    my $self = { #对象就是一个hash引用        _list => [0..9] #这就是你想要的，必须定义成引用    };    bless $self;}sub print{    my $self = shift;    print "@{ $self->{_list} }\n"; #输出这个成员}package main;my $obj = new Test(); #定义类对象$obj->print();