我想将source
数组中的值别名为哈希值
@$data{ $sth->{NAME_lc}->@* } = $self->source->@*;
完成这项任务的最佳方法是什么?
UPD
在这里,我希望哈希值引用数组值。而且,如果更改了哈希值,那么数组中的相应值也必须更改
答案 0 :(得分:1)
我找到了此解决方案:
use Data::Alias;
alias @$data{ $sth->{NAME_lc}->@* } = $self->source->@*;
UPD
@amon 感谢refaliasing
lists
:
\(@$data{ $sth->{NAME_lc}->@* }) = \($self->source->@*)
UPD
似乎最后一个示例不起作用。别名在词法范围内。报告为RT#133538
Data::Alias
仍然可以正常工作
UPD
Data::Alias
是metacpan.org上最多的++
别名模块,所以我认为这是当今最好的方法。直到refaliasing
功能被修复。