my @colours = map {
    $_ = ($_ || 0) + 0;
    ( ($_ < 0 ? 0) : ($_ > 255 ? 255) : $_ ) / 255;
} split /,/, "$colour,,", 4;