JSON-Like Strings

Build a tiny object-shaped string from scalar values.

json_like_strings.pl

use strict;
use warnings;

my $enabled = ;
my $flag = $enabled ? "true" : "false";
my $encoded = "{enabled:$flag,count:2}";

print "enabled=$enabled\n";
print "flag=$flag\n";
print "encoded=$encoded\n";

use strict;
use warnings;

my $enabled = ;
my $flag = $enabled ? "true" : "false";
my $encoded = "{enabled:$flag,count:2}";

print "enabled=$enabled\n";
print "flag=$flag\n";
print "encoded=$encoded\n";

json-like-string Object-shaped text uses names, punctuation, and scalar values in a predictable order.