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));

##</code><code>##

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

##</code><code>##

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];

##</code><code>##

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