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