Can`t установки PERL модуль Crypt :: TEA

Question

Когда я пытаюсь установить модуль Crypt :: TEA к PERL 5.18 на Windows 7, отображается сообщение об ошибке:

TEA.xs: In function 'XS_Crypt__TEA_crypt': TEA.xs:58:9: error: invalid use of void expression

Answer 1

Проблема заключается в this line:

if (SvREADONLY(output) || !SvUPGRADE(output, SVt_PV)) 
     croak("cannot use output as lvalue"); 

SvUPGRADE() - макрос с двумя действиями void, он не возвращает значение. Он будет скрипеть, если он потерпит неудачу. Измените его так:

if (!SvREADONLY(output)) 
     SvUPGRADE(output, SVt_PV);