Find out how we're going to handle includes. Some comment updates. Add

[xml-template] / perl-sax / include.pl

diff --git a/perl-sax/include.pl b/perl-sax/include.pl
new file mode 100644 (file)
index 0000000..287351b
--- /dev/null
+++ b/perl-sax/include.pl
@@ -0,0 +1,12 @@
+#! /usr/bin/perl
+use XML::TemplateSAX;
+
+my $doc = XML::TemplateSAX::process_file_to_buffer('../xml/included.xml', {
+       'color' => 'red'
+}, 0);
+my $master = XML::TemplateSAX::process_file('../xml/master.xml', {
+       'title' => 'Main HTML title',
+       'h1' => 'Nice heading here',
+       'contents' => $doc
+});
+print $master;