Help for this page

Select Code to Download

Select or download this

#! perl -slw
use strict;
...
    }
    return rgb2n( map int( $_ * 255), $r, $g, $b );
}