非常感谢 :)
接着往下看找到了这个东西
use Test::Deep::NoTest; if eq_deeply($a, $b) { print "they were deeply equal\n"; };
This exports all the same things as Test::Deep but it does not load Test::Builder so it can be used in ordinary non-test situations.
再次感谢~~
在 2011-10-14 15:55:32,"Qiang (James)" <shijialee@gmail.com> 写道: >On 10/14/2011 12:03 PM, kevin_li wrote: >> 有没有模块可以做类似Test::More 中得is_deeply 的两个复杂HASH比较的功能? >> (is_deeply结果是输出道STDOUT的,我需要返回值来作处理) >> 在CPAN上搜了一下没有发现。。。 >> List::Compare 大概看了一下 貌似不成 >> 希望有高人推荐一个 >> 谢谢啦 :) > >Test::More 的 is_deeply 文档里提到 Test::Deep 和 Test::Differences. 还有 >个 Hash::Diff. 扫了一眼, Test::Deep 里有这样的调用: > $ok = cmp_deeply($got, $expected, $name) > >可能是你想要的。RTFM :) > >Qiang. > >> >> >> >> -- >> 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。 >> 要向此网上论坛发帖,请发送电子邮件至 perlchina@googlegroups.com。 >> 要取消订阅此网上论坛,请发送电子邮件至 >> perlchina+unsubscribe@googlegroups.com。 >> 若有更多问题,请通过 http://groups.google.com/group/perlchina?hl=zh-CN >> 访问此网上论坛。 > >-- >您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。 >要向此网上论坛发帖,请发送电子邮件至 perlchina@googlegroups.com。 >要取消订阅此网上论坛,请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。 >若有更多问题,请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。 >
--
您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
要向此网上论坛发帖,请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛,请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题,请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
没有评论:
发表评论