# In test suite. # Check CDBI object is as expected. is $cdbi_object->name, 'Foo', "name is correct (Foo)" # Change the name through web site. $mech->get_ok('http://localhost:3000/object/change?name=Bar'); # Check that the name has changed. is $cdbi_object->name, 'Bar', "name has changed to 'Bar'"; # Test fails.