use constant { COLUMNS => qw/ TEST1 TEST2 TEST3 /,}
我可以使用Perl中的常量包存储数组吗?
每当我继续尝试使用像我的@attr =(COLUMNS);这样的数组时,它就不包含这些值.
解决方法
use constant { COLUMNS => [qw/ TEST1 TEST2 TEST3 /],}; print @{+COLUMNS};
use constant { COLUMNS => qw/ TEST1 TEST2 TEST3 /,}
我可以使用Perl中的常量包存储数组吗?
每当我继续尝试使用像我的@attr =(COLUMNS);这样的数组时,它就不包含这些值.
use constant { COLUMNS => [qw/ TEST1 TEST2 TEST3 /],}; print @{+COLUMNS};