<perl> 复杂数据结构 (Reference & Dereference)

$current_line{'vs1'}='first';
$vs1_key=12;
push @{ ${$vs1{"$current_line{'vs1'}"}}{$vs1_key} },  "sdsd";
print @{${$vs1{'first'}}{12}}; # "sdsd"

其数据结构：