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