http://qs321.pair.com?node_id=755638


in reply to Push function

You can use this to achieve it.
use Data::Dumper; my @arr = ([11,22,[[]]],[333,444,[]],[6666,7777,[]]); push(@{$arr[0][2][0]},3); print Dumper @arr;