%hash = (fruit=>'apple', veggie=>'corn');
@array = qw(1 2 3 4 5);
$struct={
        hashRef => \%hash,
        arrayRef => \@array
        };
print ${$struct->{hashRef}}{fruit},"\n";     #using the ${}
print ${$struct->{arrayRef}}[0],"\n";

print $struct->{hashRef}{fruit},"\n";  #can this be better to use?
print $struct->{arrayRef}[0],"\n";