my %h = (
        a =>    {b => 1},
        c =>    {d => 2},
    );
my @a = qw(a b c);

print Dumper @h{@a[0, 2]};