$student = {}; $student->{last} = 'Smith'; #### &sub(\%hash, \@array); #### my %student = {}; $student{'last'} = 'Smith';
## &sub(\%hash, \@array); ##
## my %student = {}; $student{'last'} = 'Smith';