Help for this page
$ perl -E 'my $x = "YZ"; say q{{"X":"$x"}}' {"X":"$x"}
$ perl -E 'my $x = "YZ"; say qq{{"X":"$x"}}' {"X":"YZ"}