%datastructure=(
  'foo' => [ 
             [ 'foo01', 'foo02' ], 
             [ 'foo11', 'foo12' ]
           ],
  'bar' => [ 
             [ 'bar01', 'bar02' ], 
             [ 'bar11', 'bar12' ]
           ]
);

##</code><code>##

$VAR1 = 'foo';
$VAR2 = [
          [
            'foo01',
            'foo02'
          ],
          [
            'foo11',
            'foo12'
          ]
        ];
$VAR3 = 'bar';
$VAR4 = [
          [
            'bar01',
            'bar02'
          ],
          [
            'bar11',
            'bar12'
          ]
        ];

##</code><code>##

my @entry = shift(@{@datastructure{'foo'}});

##</code><code>##

$VAR1 = [
          'foo01',
          'foo02'
        ];

##</code><code>##

@my_list = ('foo01', 'foo02');

##</code><code>##

$VAR1 = 'foo01';
$VAR2 = 'foo02';

##</code><code>##

Dumper(@entry);

##</code><code>##

$VAR1 = [
          'foo01',
          'foo02'
        ];

##</code><code>##

Dumper(@entry->[0]);

##</code><code>##

$VAR1 = [
          'foo01',
          'foo02'
        ];

##</code><code>##

Dumper(@entry->[0]->[0]);

##</code><code>##

$VAR1 = 'foo01';