Struct::Compare ってのがあるらしい.
SYNOPSIS に
use Struct::Compare;
my $is_different = compare($ref1, $ref2);
なんて書いてるから,違っているときに true になるんだと思ったら, DESCRIPTION によると
Compares two values of any type and structure and returns true if they are the same.
らしい. DESCRIPTION の方が正解.ちょっとはまった.
最終更新時間: 2009-01-03 08:13