eval(" push \@reg_map${page_counter},\[\"\$var01\",\$var00,\"$var02\"\]"); 

##</code><code>##

push @{$reg[$page_counter]}, @var;

##</code><code>##

%some = (
    foo => ...,
    bar => ...,
    baz => ...,
    ...
);