my %foo = (
    'one' => 1,
    'two' => 2,
    'three' => 3,
    'four' => 4,
);
print @foo{ 'one', 'two' }, "\n";
print @foo{ 'three', 'four' }, "\n";