Re^3: Error using Data::Alias (how to allocate array w/o filling it in?) and help avoiding 'constant' len?

huh?

push @{$this->{local_vars}},
    [my ($open_tag, $tag_print, $cur_class, $cur_id,
     $defines_class, $defines_id, $tag_output )];

$open_tag = 123;

use Data::Dumper;
print(Dumper($this));
[download]

$VAR1 = {
          'local_vars' => [
                            [
                              undef,
                              undef,
                              undef,
                              undef,
                              undef,
                              undef,
                              undef
                            ]
                          ]
        };
[download]

Mind you, putting the assignment to local_vars at the bottom will avoid aliases. That's the solution I suggested in your earlier thread.

my ($open_tag, $tag_print, $cur_class, $cur_id,
     $defines_class, $defines_id, $tag_output );

$open_tag  = 123;

push @{$this->{local_vars}},
    [$open_tag, $tag_print, $cur_class, $cur_id,
     $defines_class, $defines_id, $tag_output];
[download]

$VAR1 = {
          'local_vars' => [
                            [
                              123,
                              undef,
                              undef,
                              undef,
                              undef,
                              undef,
                              undef
                            ]
                          ]
        };
[download]

Comment on Re^3: Error using Data::Alias (how to allocate array w/o filling it in?) and help avoiding 'constant' len? Select or Download Code