=encoding utf8 This is Perl module B. =begin html =end html =head1 SYNOPSIS The B command allows you to show JSON log nicely. Especially, recursively decoded JSON in JSON string $ echo '{"foo":"{\"bar\":\"{\\\"baz\\\":123}\"}"}' | jl { "foo" : { "bar" : { "baz" : 123 } } } A complecated log can be converted to nice JSON structure to treat a tool like C . echo '{"service":"Foo-Service","pod":"bar-baz-12345","message":"{\"log\":\"[PID:12345]\\nThis is log message. foo, bar, baz, qux, long message is going to be splitted nicely to treat JSON by jq without any special function\",\"timestamp\":1560526739}"}' | jl -xxxx { "message" : { "log" : [ [ "[PID:12345]", "" ], [ "This is log message. foo", "bar", "baz", "qux", "long message is going to be splitted nicely to treat JSON by jq without any special function" ] ], "timestamp" : "2019-06-15 00:38:59" }, "pod" : "bar-baz-12345", "service" : "Foo-Service" } Make JSON logs more readable. =head1 INSTALLATION There are several ways to install, 1) The easiest way to install B is $ curl -L https://cpanmin.us | perl - -M https://cpan.metacpan.org -n App::jl 2) If your L (cpm or CPAN) is set up, you should just be able to do $ cpanm App::jl 3) Clone it, then build it $ perl Makefile.PL $ make # make install =head1 REPOSITORY App::jl is hosted on github L =head1 LICENSE This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See L. =head1 AUTHOR Dai Okabayashi Ebayashi@cpan.orgE