Help for this page

Select Code to Download

Select or download this

use strict;

...
    warn "scale $scale, scaled_index $scaled_index, index $index, adju
+sted_hue $adjusted_hue\n\n";
    $adjusted_hue;
}

Select or download this

  adjusted_hue (75) equals 75
scale 0.3, scaled_index 3, index 3, adjusted_hue 75
...

  adjusted_hue (120) does not equal 75
scale 0.4, scaled_index 4, index 4, adjusted_hue 120