$result = ($major_length == 4800)  ? 18
        : ($major_length == 8552)  ? ($val == 4   ? 33
                                   : $val == 1    ? 18
                                   : die "not handled")
        : die "not handled";