.\" Automatically generated by Pod::Man 4.14 (Pod::Simple 3.42) .\" .\" Standard preamble: .\" ======================================================================== .de Sp \" Vertical space (when we can't use .PP) .if t .sp .5v .if n .sp .. .de Vb \" Begin verbatim text .ft CW .nf .ne \\$1 .. .de Ve \" End verbatim text .ft R .fi .. .\" Set up some character translations and predefined strings. \*(-- will .\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left .\" double quote, and \*(R" will give a right double quote. \*(C+ will .\" give a nicer C++. Capital omega is used to do unbreakable dashes and .\" therefore won't be available. \*(C` and \*(C' expand to `' in nroff, .\" nothing in troff, for use with C<>. .tr \(*W- .ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p' .ie n \{\ . ds -- \(*W- . ds PI pi . if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch . if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\" diablo 12 pitch . ds L" "" . ds R" "" . ds C` "" . ds C' "" 'br\} .el\{\ . ds -- \|\(em\| . ds PI \(*p . ds L" `` . ds R" '' . ds C` . ds C' 'br\} .\" .\" Escape single quotes in literal strings from groff's Unicode transform. .ie \n(.g .ds Aq \(aq .el .ds Aq ' .\" .\" If the F register is >0, we'll generate index entries on stderr for .\" titles (.TH), headers (.SH), subsections (.SS), items (.Ip), and index .\" entries marked with X<> in POD. Of course, you'll have to process the .\" output yourself in some meaningful fashion. .\" .\" Avoid warning from groff about undefined register 'F'. .de IX .. .nr rF 0 .if \n(.g .if rF .nr rF 1 .if (\n(rF:(\n(.g==0)) \{\ . if \nF \{\ . de IX . tm Index:\\$1\t\\n%\t"\\$2" .. . if !\nF==2 \{\ . nr % 0 . nr F 2 . \} . \} .\} .rr rF .\" ======================================================================== .\" .IX Title "XML::Filter::Distributor 3pm" .TH XML::Filter::Distributor 3pm "2022-06-28" "perl v5.34.0" "User Contributed Perl Documentation" .\" For nroff, turn off justification. Always turn off hyphenation; it makes .\" way too many mistakes in technical documents. .if n .ad l .nh .SH "NAME" XML::Filter::Distributor \- Multipass processing of documents .SH "VERSION" .IX Header "VERSION" version 0.46 .SH "SYNOPSIS" .IX Header "SYNOPSIS" .Vb 1 \& ## See XML::SAX::Manifold for an easier way to use this filter. \& \& use XML::SAX::Machines qw( Machine ) ; \& \& ## See the wondrous ASCII ART below for help visualizing this \& ## XML::SAX::Manifold makes this a lot easier. \& my $m = Machine( \& [ Intake => "XML::Filter::Distributor" => qw( V TOC Body ) ], \& [ V => "My::Validator" ], \& [ TOC => "My::TOCExtractor" => qw( Merger ) ], \& [ Body => "My::BodyMasseuse" => qw( Merger ) ], \& [ Merger => "XML::Filter::Merger" => qw( Output ) ], \& [ Output => \e*STDOUT ], \& ); \& \& ## Let the distributor coordinate with the merger. \& ## XML::SAX::Manifold does this for you. \& $m\->Intake\->set_aggregator( $m\->Merger ); \& \& $m\->parse_file( "foo" ); .Ve .SH "DESCRIPTION" .IX Header "DESCRIPTION" XML::Filter::Distributor is a \s-1SAX\s0 filter that allows \*(L"multipass\*(R" processing of a document by sending the document through several channels of \s-1SAX\s0 processors one channel at a time. A channel may be a single \s-1SAX\s0 processor or a machine like a pipeline (see XML::SAX::Pipeline). .PP This can be used to send the source document through one entire processing chain before beginning the next one, for instance if the first channel is a validator or linter that throws exceptions on error. .PP It can also be used to run the document through multiple processing chains and glue all of the chains' output documents back together with something like XML::Filter::Merger. The \s-1SYNOPSIS\s0 does both. .PP This differs from XML::Filter::SAXT in that the channels are prioritized and each channel receives all events for a document before the next channel receives any events. XML::Filter::Distributor buffers all events while feeding them to the highest priority channel (\f(CW$processor1\fR in the synopsis), and replays them for each lower priority channel one at a time. .PP The event flow for the example in the \s-1SYNOPSIS\s0 would look like, with the numbers next to the connection arrow indicating when the document's events flow along that arrow. .PP .Vb 11 \& +\-\-\-\-\-\-\-\-\-\-\-\-\-+ \& +\->| Validator | \& 1/ +\-\-\-\-\-\-\-\-\-\-\-\-\-+ \& / \& 1 +\-\-\-\-\-\-\-+ 2 +\-\-\-\-\-\-\-\-\-\-\-\-\-\-+ 2 +\-\-\-\-\-\-\-\-+ \& upstream \-\-\-\-| Dist. |\-\-\-\->| TOCExtractor |\-\-*\-\->| Merger |\-> STDOUT \& +\-\-\-\-\-\-\-+ +\-\-\-\-\-\-\-\-\-\-\-\-\-\-+ / +\-\-\-\-\-\-\-\-+ \& \e3 /3 \& \e +\-\-\-\-\-\-\-\-\-\-\-\-\-\-+ \& +\->| BodyMasseuse | \& +\-\-\-\-\-\-\-\-\-\-\-\-\-\-+ | .Ve .PP Here's the timing of the event flows: .PP .Vb 3 \& 1: upstream \-> Dist \-> Validator \& 2: Dist \-> TOCExtractorc \-> Merger \-> STDOUT \& 3: Dist \-> BodyMassseuse \-> Merger \-> STDOUT .Ve .PP When the document arrives from upstream, the events all arrive during time period 1 and are buffered and also passed through processor 1. After all events have been received (as indicated by an \f(CW\*(C`end_document\*(C'\fR event from upstream), all events are then played back through processor 2, and then through processor 3. .SH "NAME" XML::Filter::Distributor \- Multipass processing of documents .SH "METHODS" .IX Header "METHODS" .IP "new" 4 .IX Item "new" .Vb 5 \& my $d = XML::Filter::Distributor\->new( \& { Handler => $h1 }, \& { Handler => $h2 }, \& ... \& ); .Ve .Sp A channel may be any \s-1SAX\s0 machine, frequently they are pipelines. .IP "set_handlers" 4 .IX Item "set_handlers" .Vb 1 \& $p\->set_handlers( $handler1, $handler2 ); .Ve .Sp Provided for compatibility with other \s-1SAX\s0 processors, use set_handlers instead. .IP "set_handler" 4 .IX Item "set_handler" Provided for compatibility with other \s-1SAX\s0 processors, use set_handlers instead. .SH "LIMITATIONS" .IX Header "LIMITATIONS" Can only feed a single aggregator at the moment :). I can fix this with a bit of effort. .SH "AUTHOR" .IX Header "AUTHOR" .Vb 1 \& Barrie Slaymaker .Ve .SH "COPYRIGHT" .IX Header "COPYRIGHT" .Vb 1 \& Copyright 2000, Barrie Slaymaker, All Rights Reserved. .Ve .PP You may use this module under the terms of the Artistic, \s-1GPL,\s0 or the \s-1BSD\s0 licenses. .SH "AUTHORS" .IX Header "AUTHORS" .IP "\(bu" 4 Barry Slaymaker .IP "\(bu" 4 Chris Prather .SH "COPYRIGHT AND LICENSE" .IX Header "COPYRIGHT AND LICENSE" This software is copyright (c) 2013 by Barry Slaymaker. .PP This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.