Yet Another CPAN Grep

Otogiri ( Y/YT/YTURTLE/Otogiri-0.24.tar.gz, YTURTLE, 2025; MetaCPAN )

Otogiri/lib/DBIx/Otogiri.pm ( view source; MetaCPAN )

 (optional)

    use JSON;
    inflate => sub {
        my ($data, $tablename, $db) = @_;
        if (defined $data->{json}) {
            $data->{json} = decode_json($data->{json});
        }

 (optional)

    use JSON;
    deflate => sub {
        my ($data, $tablename, $db) = @_;
        if (defined $data->{json}) {
            $data->{json} = encode_json($data->{json});
        }