if ( keys %delete_list || keys %insert_list ) { $pfm->finish ( 0, { delete_list => \%delete_list, insert_list => \%insert_list } ); } else { $pfm->finish; }