use strict; use libdb; sub DoUpdate($$$) { my ($dbhandle, $dbname, $version) = @_; # # This has been nullified; made a mistake. # return 0; } # Local Variables: # mode:perl # End: