p::PipeFilter::JsonToTsv;
{
$App::PipeFilter::JsonToTsv::VERSION = '0.005';
}
use Moose;
extends 'App::PipeFilter::Generic';
# TODO - Refactor into a common role? Duplicated in JsonCut.pm.
has o
e::Input::Json",
"App::PipeFilter::Role::Transform::None",
"App::PipeFilter::Role::Output::Tsv",
);
1;
__END__
=pod
=head1 NAME
App::PipeFilter::JsonToTsv - translate streams of JSON objects
is the json2tsv(1) pipeline filter.
#!/usr/bin/perl
use App::PipeFilter::JsonToTsv;
exit App::PipeFilter::JsonToTsv->new_with_options()->run();
=head1 DESCRIPTION
App::PipeFilter::JsonToTsv i
package App::PipeFilter::PcapToJson;
{
$App::PipeFilter::PcapToJson::VERSION = '0.005';
}
use Moose;
extends 'App::PipeFilter::Generic';
with (
"App::PipeFilter::Role::Opener::PcapInput",
"App
::Role::Writer::Print",
"App::PipeFilter::Role::Input::ArrayBuffer",
"App::PipeFilter::Role::Transform::None",
"App::PipeFilter::Role::Output::Json",
);
1;
__END__
# vim: ts=2 sw=2 expandtab
reads JSON,
does no transformations on the deserialized data, and writes new JSON
one object per line.
package App::PipeFilter::JsonCat;
use Moose;
extends 'App::PipeFilter::Generic::Json';