use 5.010_001;

use strict;
use warnings;

my %hash = qw/ one um two dois /;

{
	local $, = "\t";
	say @hash{ qw# one two # };
	say @hash{ (qw# one two #) };
}