Help for this page

Select Code to Download


  1. or download this
    my $facet_counts = $response->facet_counts;
my $autId = $facet_counts->{facet_fields}{author_id};
...
for(my $i=0; $i < int(@{$autId}); $i++){
  print @{$autId}[$i], ": ", @{$autId}[++$i], "<br>\n";
};
  2. or download this
    $VAR1 = \[ '9291', 131, '3389', 88, '622', 85, '123715', 81, '5091', 6
+3 ];
9291: 131
...
123715: 81
5091: 63