为什么Perl中的base64字符串比较失败?

前端之家收集整理的这篇文章主要介绍了为什么Perl中的base64字符串比较失败?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我试图将encode_base64(‘test’)与包含base64字符串’test’的字符串变量进行比较.问题是它永远不会验证!

use MIMI::Base64 qw(encode_base64);

if (encode_base64("test") eq "dGVzdA==")
{
    print "true";
}

我忘了什么吗?

解决方法

Here’s链接到Perlmonks页面,上面写着“注意encode_base64()编码字符串末尾的换行符”.

所以简单的’eq’可能会失败.

要取消换行符,请改为使用encode_base64(“test”,“”).

猜你在找的Perl相关文章