%o= (a=>'a',
     b=>'b',
     c=>'c');


##</code><code>##

use strict;
my %o;
@o{qw(a b c d e f)} = (1,2,3,4,5);
my @foo;
@foo=@o{"c".."e"};
print @foo;


##</code><code>##

@o("a","e","f")