my $aref = [{DB => 'Alpha',
             SOURCE => 'here'},
            {DB => 'Beta',
             SOURCE => 'there'},
            {DB => 'Gamma',
             SOURCE => 'someplace'}];

##</code><code>##

my @list = @$aref[0..2]->{DB};