my @foo; @foo = (10, \$foo[0], 20); print ${ $foo[1] }; # nothing