$ perl -E 'my $x = "YZ"; say qq{{"X":"$x"}}'
{"X":"YZ"}