Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl
 
...

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

Select or download this

This hash %bindersHash
HISCLTFGR = 16
...
FFPSIRDLL = 1
FLPSDFFPS = 1
IISCSCPTV = 1