#!/usr/bin/perl
 
use strict;
use warnings;
use Color::Spectrum qw (generate);

$uniqueBinders = scalar (keys %bindersHash);
my @colours = generate($uniqueBinders, '#FF0000', '#0060BF');