Help for this page
sub rgb2n{ unpack 'N', pack 'CCCC', 0, @_ } ... $v < $_ and return rgb2n( $map{ $_ }->( $v % 255 / 256 ) ) for + @map; } }
#! perl -slw use strict; ... magenta -> white 255 0..255 255 256
www.com | www.net | www.org
No recent polls found