报错：Can‘t locate Win32/Console.pm in @INC (you may need to install the Win32::Console module)

最新推荐文章于 2024-06-26 23:37:05 发布

菜又学

最新推荐文章于 2024-06-26 23:37:05 发布

阅读量2.6k

点赞数 4

分类专栏： Open SSL 文章标签： perl 开发语言

原文链接：https://blog.csdn.net/zhangzq86/article/details/105100942

版权

Open SSL 专栏收录该内容

9 篇文章 0 订阅

订阅专栏

安装Open SSL中执行命令：

perl Configure VC-WIN32 no-asm --prefix=C:\Dpan\javaProject\OpenSSL\openssl-1.1.1b

出现以下错误

Can't locate Win32/Console.pm in @INC (you may need to install the Win32::Console module)

解决方法：

找到Perl64\site\lib\ActivePerl目录下的Config.pm文件，注释下面代码，大约在393行开始。

# Prevent calling Win32::Console::DESTROY on a STDOUT handle
#my $console;
sub _warn {
#    my($msg) = @_;
#    unless (-t STDOUT) {
#	print "\n$msg\n";
#	return;
#    }
#    require Win32::Console;
#    unless ($console) {
#	$console = Win32::Console->new(Win32::Console::STD_OUTPUT_HANDLE());
#    }
#    my($col,undef) = $console->Size;
#    print "\n";
#    my $attr = $console->Attr;
#    $console->Attr($Win32::Console::FG_RED | $Win32::Console::BG_WHITE);
#    for (split(/\n/, "$msg")) {
#	$_ .= " " while length() < $col-1;
#	print "$_\n";
#    }
#    $console->Attr($attr);
#    print "\n";
}

注释之后的运行结果