for (qw(mailbox subscribe country))
{ ${"$sel_$_{$$_}"} = 'test' }  # <= Not working!!!