in reply to my program will run on my computer but not in CGI
use strict; use XML::Simple; my $config = "fooconf.xml"; my $xml = XMLin($config) or die "Error reading config: $!"; $xml->{section1}{param1} = "replacement1"; $xml->{section2}{other} = "replacement2"; open CONF, ">$config" or die "Error writing config: $!"; print CONF XMLout($xml, NoAttr => 1); close CONF;
|
|---|