Select Code to Download

$mailbox   = 'inbox';
$subscribe = 'yes';
...
$sel_mailbox{$mailbox}     = 'test';
$sel_subscribe{$subscribe} = 'test';
$sel_country{$country}     = 'test';

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