Re^3: unique data in dynamic hash

Show us what you want to achieve. Something like this:

use warnings;
use strict;
use Data::Dumper;

my %hoh;

while (<DATA>)
  {
  my @items = split ' ';
  push @{$hoh{'this'}->{'that'}->{'theOther'} }, [@items];
  }
  
print Dumper (\%hoh);

__DATA__
eggs bacon cheese
tomatoes potatoes onions
beans peas cabbage
[download]

$VAR1 = {
          'this' => {
                      'that' => {
                                  'theOther' => [
                                                  [
                                                    'eggs',
                                                    'bacon',
                                                    'cheese'
                                                  ],
                                                  [
                                                    'tomatoes',
                                                    'potatoes',
                                                    'onions'
                                                  ],
                                                  [
                                                    'beans',
                                                    'peas',
                                                    'cabbage'
                                                  ]
                                                ]
                                }
                    }
        };
[download]

Perl is Huffman encoded by design.

Comment on Re^3: unique data in dynamic hash Select or Download Code