use WebService::Solr; my $solr = WebService::Solr->new( $solrurl ); my $response = $solr->search( $solrquery ); my @hits = $response->docs; foreach my $docs ( @hits ) { # display print "Your search ($solrquery) found " . ( $#hits + 1 ) . " d +ocument(s).\n\n"; my $test = $docs->value_for( 'test' ); print "aId=$aId\n"; my $doc = WebService::Solr::Document->new; my $newtest="ff9b7a13-e68c-3150-86cc-e3eef0f90b14"; $doc->add_fields(( $newtest )); $solr->update( $doc ); $solr->commit; $aId = $docs->value_for( 'test' ); print "newtest=$test";
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |