I am having trouble getting XMLout to work correctly in order to save off data that can be read back in using XMLin.
I keep getting:

not well-formed (invalid token) at line 1, column 5, byte 5 at /usr/lib/perl5/XML/Parser.pm line 185

with code:

for ($ref = 1; $ref<1000; $ref++) {
$foo{$ref} = int(1000*rand);
}

$xs = new XML::Simple;
$ref = $xs->XMLout(\%foo) || die $!;

open (FOO, ">test2.xml") || die $!; #test2.pl is the file name I'm running.
print FOO $ref;
close FOO;
print "OK\n";

$ref = $xs->XMLin() || die $!;


--
We are experiencing system trouble -- do not adjust your terminal.


--
To UNSUBSCRIBE, email to [EMAIL PROTECTED] with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Reply via email to