my $entry = shift(@{@datastructure{'foo'}});   # it's an anrray ref
print $_ for @$entry;    # dereference it to get the array

##</code><code>##

Dumper(\@entry);
$VAR1 = [
          [
            'foo01',
            'foo02'
          ]
        ];