while (my ($k, $v) = each %$ref2) { $ref2->{$k} = '' if (!defined $ref2->{$k}); } push @{ $tablist{$user_table} }, $ref2;