neptoner has asked for the wisdom of the Perl Monks concerning the following question:
$origResponse='xmlstring1’; $newResponse='xmlstring2’; use XML::Diff; my $diff = XML::Diff->new(); while(1){ print STDERR "$origResponse\n\n"; print STDERR "$newResponse\n\n"; $diffgram = $diff->compare(-old => $origResponse ,-new => $newResponse ,-asString => 1 ); sleep 5; print STDERR "$diffgram\n"; print STDERR "================================================ +===================================================================== +==\n"; }
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: XML::diff
by vek (Prior) on Jan 10, 2006 at 08:10 UTC |