I have the same problem on Fedora. As a work-around, I used Cond::Expr. This test script correctly exposes the assignment.

#!/usr/bin/perl

use strict 'refs';
use warnings 'all';
use Cond::Expr;
use Devel::SimpleTrace;

my $answer = 1;
my %args = (
    this => 'that',
    (($answer = 1))
        ? (answer => $answer)
            : ($answer)
                ? (wrong_answer => 1)
                    : (no_answer => 1),
);
[download]