<div dir="ltr"><div dir="ltr">Awesome, thanks! </div> <div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Fri, Mar 8, 2019 at 6:18 AM Nicolas Steenlant <<a href="mailto:Nicolas.Steenlant@ugent.be">Nicolas.Steenlant@ugent.be</a>> wrote: </div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">You can just use the unix split command: <a href="https://unix.stackexchange.com/questions/74146/split-file-into-multiple-small-files-separate-by-the-newline-symbol" rel="noreferrer" target="_blank">https://unix.stackexchange.com/questions/74146/split-file-into-multiple-small-files-separate-by-the-newline-symbol</a> or with Perl and Catmandu: use Catmandu; my $importer = Catmandu->importer('MARC',file => 'input/2records.seq' , type => 'ALEPHSEQ'); my $fixer = Catmandu->fixer('fixesCatmandu.txt'); my $count = 0; $fixer->fix($importer->benchmark)->each(sub { my $rec = $_[0]; Catmandu->exporter('JSON', file => "/tmp/out_${count}.json")- >add($rec); $count++; }); Greets, Nicolas On Thu, 2019-03-07 at 13:05 -0300, Tiago Murakami wrote: > Hi, > > Thanks! It is possible to, for each json, create one file? > > > On Thu, Mar 7, 2019 at 12:40 PM Nicolas Franck < > <a href="mailto:Nicolas.Franck@ugent.be" target="_blank">Nicolas.Franck@ugent.be</a>> wrote: > > > > > On 7 Mar 2019, at 16:30, Tiago Murakami <<a href="mailto:trmurakami@gmail.com" target="_blank">trmurakami@gmail.com</a>> > > wrote: > > > > > > Hi, > > > > > > I made my first perl script to convert MARC ALEPHSEQ into JSON. I > > can import and convert to JSON using myfixes. How I can export into > > JSON files? > > > > > > Thanks, > > > > > > ================= > > > > > > use Catmandu; > > > > > > my $importer = Catmandu->importer('MARC',file => > > 'input/2records.seq' , type => 'ALEPHSEQ'); > > > my $fixer = Catmandu->fixer('fixesCatmandu.txt'); > > > my $exporter = Catmandu->exporter('JSON'); > > > > my $exporter = Catmandu->exporter('JSON', file => > > "/path/to/my/file.json"); > > > > or direct the output of stdout to a file > > > > > > > > $exporter->add_many( > > > $fixer->fix($importer->benchmark) > > > ); > > > > > > ================= > > > > > > -- > > > Tiago Murakami > > > _______________________________________________ > > > librecat-dev mailing list > > > - send list mails to <a href="mailto:librecat-dev@lists.uni-bielefeld.de" target="_blank">librecat-dev@lists.uni-bielefeld.de</a> > > > - to unsubscribe or change options, visit > > <a href="https://lists.uni-bielefeld.de/mailman2/cgi/unibi/listinfo/librecat-dev" rel="noreferrer" target="_blank">https://lists.uni-bielefeld.de/mailman2/cgi/unibi/listinfo/librecat-dev</a> > > > - project website: <a href="http://librecat.org/" rel="noreferrer" target="_blank">http://librecat.org/</a> > > > > > _______________________________________________ > librecat-dev mailing list > - send list mails to <a href="mailto:librecat-dev@lists.uni-bielefeld.de" target="_blank">librecat-dev@lists.uni-bielefeld.de</a> > - to unsubscribe or change options, visit > <a href="https://lists.uni-bielefeld.de/mailman2/cgi/unibi/listinfo/librecat-dev" rel="noreferrer" target="_blank">https://lists.uni-bielefeld.de/mailman2/cgi/unibi/listinfo/librecat-dev</a> > - project website: <a href="http://librecat.org/" rel="noreferrer" target="_blank">http://librecat.org/</a> </blockquote></div> <div> </div>-- <div dir="ltr" class="gmail_signature">Tiago Murakami</div></div>