Select Code to Download

my %src = ( 0=>'a', 1=>'b', ... );

...

my %dst;
@dst{ $s..$e } = @src{ $s..$e };

my @src = ( 'a', 'b', ... );

my ($s,$e) = (5,10);

my @dst = @src[ $s..$e ];