print $comp->compare ([[1,2]],[[1,2]]) ? "Yes\n" : "No\n"; print $comp->compare ([1,2],[1,2]) ? "Yes\n" : "No\n"; #### No Yes