my $t;
sub tuple { $t++ => 12 }
my $bool = 0;
my %h = (tuple()) x !! $bool;