->data, "Generate data"); ok (my $s2 = $c2->summary, "Generate summary"); isnt ($d1, $d2, "Not the same data"); isnt ($s1, $s2, "Not the same structure"); is_deeply ($d1, $d2, "Same data