Re^3: Formatting in XML::Twig->print()

Without the KeepSpaces option, XML::Twig munges all the whitespace in the original XML so that the output looks like:

<Config ASDisableNagle="false" AcceptAllContent="false" IISDisableNagl
+e="false" IgnoreDNSFailures="false" RefreshInterval="60" ResponseChun
+kSize="64"><Log LogLevel="Error" Name="/opt/IBMWebAS/logs/native.log"
+/><VirtualHostGroup Name="foobarcom"><VirtualHost Name="foo.bar.com"/
+></VirtualHostGroup><ServerCluster CloneSeparatorChange="false" LoadB
+alance="Round Robin" Name="cl_app302_prod" PostSizeLimit="-1" RemoveS
+pecialHeaders="true" RetryInterval="60"><Server CloneID="umjbf6mv" Co
+nnectTimeout="0" ExtendedHandshake="false" LoadBalanceWeight="2" MaxC
+onnections="-1" Name="swel3p_cl_app302_prod" WaitForContinue="false">
+<Transport Hostname="swel3p.bar.com" Port="8132" Protocol="http"/></S
+erver><PrimaryServers><Server Name="New_2"/><Server Name="New_1"/></P
+rimaryServers></ServerCluster>
   
        
   <!-- APP URI groups point at urls -->

    <UriGroup Name="event/event.war_URIs"><Uri AffinityCookie="JSESSIO
+NID_302" Name="/event/*.jsp"/><Uri AffinityCookie="JSESSIONID_302" Na
+me="/event/ThreadedEventServlet"/></UriGroup>

   <!-- Route statement bring it all together -->

   <Route ServerCluster="cl_app302_prod" UriGroup="event/event.war_URI
+s" VirtualHostGroup="foobarcom"/></Config>
[download]

-Nitrox

Comment on Re^3: Formatting in XML::Twig->print() Download Code

Replies are listed 'Best First'.
Re^4: Formatting in XML::Twig->print() by mirod (Canon) on Feb 12, 2005 at 19:46 UTC
Indeed, but did you try using the `pretty_print => 'indented'` option too?	[reply]
Re^5: Formatting in XML::Twig->print() by Nitrox (Chaplain) on Feb 12, 2005 at 19:59 UTC
Perfect! That is the combination I was looking for. One other minor issue; the Encoding declaration line, `<?xml version="1.0" encoding="ISO-8859-1"?>`, from the original input file doesn't get written to the output file. Is this another setting I overlooked or do I need to simply print that manually before printing the XML? Thanks for all your help. -Nitrox	[reply] [d/l]
Re^6: Formatting in XML::Twig->print() by mirod (Canon) on Feb 12, 2005 at 20:05 UTC
I think it is because you print the root element of the document (`$parser->root->print(\PF)`), instead of simply printing the document (`$parser->print(\PF)`).	[reply] [d/l] [select]


good chemistry is complicated, and a little bit messy -LW
	PerlMonks