my $h = {
    word1 => [ 1..3 ],
    word2 => [ 4..7 ],
};
push @{ $h->{word1} }, $h->{word2};
print $h->{word1}[3][3];