From: sgunderson@bigfoot.com <>
Date: Thu, 1 Mar 2007 11:02:45 +0000 (+0100)
Subject: Add (failing) perl-sax/clone test.
X-Git-Url: https://git.sesse.net/?a=commitdiff_plain;h=c862c4aba8727bc74f4b23a5128d8d0dd9bf17f9;p=xml-template

Add (failing) perl-sax/clone test.
---

diff --git a/perl-sax/clone.pl b/perl-sax/clone.pl
new file mode 100644
index 0000000..21cfebb
--- /dev/null
+++ b/perl-sax/clone.pl
@@ -0,0 +1,13 @@
+#! /usr/bin/perl
+use XML::TemplateSAX;
+
+my $doc = XML::TemplateSAX::process_file('../xml/clone.xml', {
+	'color' => 'blue',
+	'#things' => [
+		{ 'li' => 'Raindrops on roses' },
+		{ 'li' => 'Whiskers on kittens' },
+		{ 'li' => 'Bright copper kettles' },
+		{ 'li' => 'Warm, woolen mittens'} 
+	]
+});
+print $doc;