> Я имею в виду даже не котолампа, а копипаста.

Логическая нестыковка по контексту. Следовательно, либо сообщения #88 и #89 писались разными анонимами, либо плоховато в голове у анона.

Не знаю что вы и где видели, но вот вам реальный "котоламповый" кусок кода из error.xsh :

MODULE = DriverIO                PACKAGE = DriverIO::Error

# комбинированный код+ошибка
U32 RawCode(arg)
    U32 arg;
    CODE:
        RETVAL = raw_error_code(arg);
    OUTPUT:
        RETVAL

# xs_error_code set XS_ERROR_CODE_FLAG
void SetXSErrorCode(arg)
    U32 arg;
    CODE:
        set_xs_error_code(arg);

AV* GetCode()
    INIT:
        AV* av = newAV();
        SV* flags = newSVuv(get_error_code_flags());
        SV* code  = newSVuv(error_code_no_flags(0));
    CODE:
        av_push(av, flags);
        av_push(av, code);
    RETVAL = av;
    OUTPUT:
        RETVAL

U32 Success()
    CODE:
        RETVAL = test_success();
    OUTPUT:
        RETVAL

U32 IsDriverError()
    CODE:
        RETVAL = test_driver_error();
    OUTPUT:
        RETVAL

U32 IsXSError()
    CODE:
        RETVAL = !test_driver_error();
    OUTPUT:
        RETVAL