$wire2{ "a"} .= $x;

##</code><code>##

use strict;
use warnings;