Re: how to get list of unique terms for a field

[Bill Dueber]

Here's a pretty simple perl script. Call it as "scriptname facetindex" (or
"scriptname facetindex maxnum")

#############

#!/usr/local/bin/perl
use strict;
use JSON::XS;
use LWP::Simple;

### CHANGE THIS TO YOUR URL!! ###

my $select = 'http://solr-vufind:8026/solr/biblio/select';


# Get facet and (optional) maxnum from the command line
my ($facet, $num) = @ARGV;
$num ||= -1; # all values

my $url =
"$select?q=*:*&rows=0&facet=true&facet.limit=$num&facet.field=$facet&wt=json&
json.nl=arrarr";
my $json = decode_json(get($url));

foreach my $a (@{$json->{facet_counts}{facet_fields}{$facet}}) {
    print $a->[0], "\n";
}