Select Code to Download

[0] Perl> @x = (undef)x7;;
[0] Perl> use Devel::Peek;;
...
    SV = NULL(0x0) at 0x3cb4af0
      REFCNT = 1
      FLAGS = ()

[0] Perl> undef @x;;
[0] Perl> $#x = 6;;
...
    Elt No. 1
    Elt No. 2
    Elt No. 3