%hash=@array;
@ints = keys %hash;
@strs = values %hash;

##</code><code>##

%hash= reverse @array;
@strs = keys %hash;
@ints = values %hash;

##</code><code>##

  DB<103> %hash = reverse qw/1 A 2 B 3 C 4 D 5 E/
 => ("E", 5, "D", 4, "C", 3, "B", 2, "A", 1)
 
  DB<104> keys %hash
 => ("A", "C", "D", "B", "E")
 
  DB<105> values %hash
 => (1, 3, 4, 2, 5)