t environments.
It allows you to read, update, and reset shared variables stored in a file (uses JSON format), making it easy to coordinate between multiple processes.
This module was written to ser
= 0;
eval {
require JSON::XS;
JSON::XS->import; 1;
} or do {
require JSON;
JSON->import;
};
#my $json_text = encode_json($data);
#my $decoded_data = decode_json($json_text);
=head1 METHODS
my $json_text = undef; do { local $/; $json_text=readline($self->{fh}) };
#my $json_text = undef; do { local $/; my $fh=$self->{fh}; <$fh> };
&dbg( "$$ post-lock d=$json_text" );
#my $json_text