CircosAPI

#!/usr/bin/perl
use lib::CircosAPI;

my $histo = Plot->new(file => 'data/histo.txt', t => 'histogram', ...);
my $sv = Link->new(file => 'data/sv.txt', ...);
my $hg19 => Base->new(karyotype => 'hg19');

my $c = CircosAPI->new(base => $hg19);
# Ideogram, Spacing and Image initialized via defaults.json

$c->addPlot($histo);
$c->addLink($sv);

print $c->compile;

karyotype = data/karyotype.hg19.txt
<ideogram>
...
</ideogram>
<plots>
<plot>
file = data/histo.txt
type = histogram
...
</plot>
</plots>
<links>
<link>
file = data/sv.txt
...
</link>
</links>