my($red, $green, $blue) = hexa_triplet(0x0000FF);