$q->delete('class_id')
[download]

Mea culpa. Thanks for the reminder I have been away from Perl for a good while.

Unfortunately the Class::DBI update() method does not work unless the $obj has an id defined and part of the problem here is that the insert id isn't in $obj unless find_or_create gets an explicit undef or an explicit $id.
TIA
jg


_____________________________________________________
"The man who grasps principles can successfully select his own methods.
The man who tries methods, ignoring principles, is sure to have trouble.
~ Ralph Waldo Emerson

That's why I said you should delete the value AFTER the call to find_or_create. Alternatively, you could replace your loop with this:

foreach my $field (grep { $_ ne 'id' } $q->param) {
[download]