#!/usr/bin/perl
use strict;
use warnings;
use XML::CompareML::HTML;
open O, ">", "comparison.html";
my $converter =
XML::CompareML::HTML->new(
'input_filename' => "./scm-comparison.xml",
'output_handle' => \*O,
);
$converter->process();
close(O);
1;