else {
    my ($foo, %bar, $bax);
    ...
    }