1 2 3 4 5 6
my %fruit_color = ("apple", "red", "banana", "yellow"); my @fruits = keys %fruit_colors; my @colors = values %fruit_colors; print @fruits; print @colors;