Apache-Solr

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

            "ExtUtils::MakeMaker" : "0"
         }
      },
      "configure" : {
         "requires" : {
            "ExtUtils::MakeMaker" : "0"
         }
      },
      "runtime" : {
         "requires" : {
            "Data::Dumper" : "0",
            "Encode" : "0",
            "HTTP::Request" : "0",
            "JSON" : "0",
            "LWP::UserAgent" : "0",
            "Log::Report" : "0",
            "MIME::Types" : "0",
            "Scalar::Util" : "0",
            "Test::More" : "0",
            "Time::HiRes" : "0",
            "URI" : "0",

META.yml  view on Meta::CPAN

license: perl
meta-spec:
  url: http://module-build.sourceforge.net/META-spec-v1.4.html
  version: '1.4'
name: Apache-Solr
no_index:
  directory:
    - t
    - inc
requires:
  Data::Dumper: '0'
  Encode: '0'
  HTTP::Request: '0'
  JSON: '0'
  LWP::UserAgent: '0'
  Log::Report: '0'
  MIME::Types: '0'
  Scalar::Util: '0'
  Test::More: '0'
  Time::HiRes: '0'
  URI: '0'

Makefile.PL  view on Meta::CPAN

use ExtUtils::MakeMaker;

WriteMakefile
  ( NAME        => 'Apache::Solr'
  , VERSION     => '1.11'
  , PREREQ_PM   =>
     { Data::Dumper	=> 0
     , Encode           => 0
     , HTTP::Request	=> 0
     , JSON		=> 0
     , Log::Report	=> 0
     , LWP::UserAgent	=> 0
     , Scalar::Util	=> 0
     , Test::More	=> 0
     , Time::HiRes	=> 0
     , URI		=> 0
     , XML::LibXML::Simple => 0

lib/Apache/Solr.pod  view on Meta::CPAN

=item core => NAME

=back

example: 

  my $result = $solr->coreStatus;
  $result or die $result->errors;

  use Data::Dumper;
  print Dumper $result->decoded->{status};

=item $obj-E<gt>B<coreUnload>(%options)

Removes a core from Solr. Active requests will continue to be processed, but no new requests will be sent to the named core. If a core is registered under more than one name, only the given name is removed.

 -Option--Default
  core    <this core>

=over 2

lib/Apache/Solr/Result.pm  view on Meta::CPAN

no warnings 'recursion';  # linked list of pages can get deep

use strict;

use Log::Report    qw(solr);
use Time::HiRes    qw(time);
use Scalar::Util   qw(weaken);

use Apache::Solr::Document ();

use Data::Dumper;
$Data::Dumper::Indent    = 1;
$Data::Dumper::Quotekeys = 0;


use overload
    '""' => 'endpoint'
  , bool => 'success';

#----------------------

sub new(@) { my $c = shift; (bless {}, $c)->init({@_}) }
sub init($)

lib/Apache/Solr/XML.pm  view on Meta::CPAN

use strict;

use Log::Report          qw(solr);

use Apache::Solr::Result ();
use XML::LibXML::Simple  ();
use HTTP::Message        ();
use HTTP::Request        ();
use Scalar::Util         qw(blessed);

use Data::Dumper;
$Data::Dumper::Indent    = 1;
$Data::Dumper::Quotekeys = 0;

# See the XML::LibXML::Simple manual page
my @xml_decode_config = (
	ForceArray   => [],
	ContentKey   => '_',
	KeyAttr      => [],
);


sub init($)

t/12facet.t  view on Meta::CPAN

use warnings;
use strict;

use lib 'lib';
use Apache::Solr::XML;
use Log::Report  'try';

use Test::More tests => 17;

use Data::Dumper;
$Data::Dumper::Indent    = 1;
$Data::Dumper::Quotekeys = 0;

# the server will not be called in this script.
my $server = 'http://localhost:8080/solr';
my $core   = 'my-core';

my $solr = Apache::Solr::XML->new(server => $server, core => $core);
ok(defined $solr, 'instantiated client');

sub decode_xml($)
{   my $xml  = shift;

t/20xml.t  view on Meta::CPAN

#XXX !!! DO NOT EDIT t/21json.t, because it is a symlink to t/20xml.t

use warnings;
use strict;

use lib 'lib';
use Test::More;

my $server;

use Data::Dumper;
$Data::Dumper::Indent = 1;
$Data::Dumper::Quotekeys = 0;

BEGIN {
    $server = $ENV{SOLR_TEST_SERVER}
        or plan skip_all => "no SOLR_TEST_SERVER provided";

	$server .= '/markov';
}

require_ok('Apache::Solr');
require_ok('Apache::Solr::Document');

t/21json.t  view on Meta::CPAN

#XXX !!! DO NOT EDIT t/21json.t, because it is a symlink to t/20xml.t

use warnings;
use strict;

use lib 'lib';
use Test::More;

my $server;

use Data::Dumper;
$Data::Dumper::Indent = 1;
$Data::Dumper::Quotekeys = 0;

BEGIN {
    $server = $ENV{SOLR_TEST_SERVER}
        or plan skip_all => "no SOLR_TEST_SERVER provided";

	$server .= '/markov';
}

require_ok('Apache::Solr');
require_ok('Apache::Solr::Document');

t/30result.t  view on Meta::CPAN

# Try all examples from http://wiki.apache.org/solr/SearchHandler

use warnings;
use strict;

use lib 'lib';
use Apache::Solr::XML;

use Test::More tests => 5;

use Data::Dumper;
$Data::Dumper::Indent    = 1;
$Data::Dumper::Quotekeys = 0;

# the server will not be called in this script.
my $server = 'http://localhost:8080/solr';
my $core   = 'my-core';

my $solr = Apache::Solr::XML->new(server => $server, core => $core);
ok(defined $solr, 'instantiated client');

sub decode_xml($)
{   my $xml  = shift;

t/31sequential.t  view on Meta::CPAN

#!/usr/bin/perl

use warnings;
use strict;

use lib 'lib';
use Test::More;

my $server;

use Data::Dumper;
$Data::Dumper::Indent = 1;
$Data::Dumper::Quotekeys = 0;

BEGIN {
    $server = $ENV{SOLR_TEST_SERVER}
        or plan skip_all => "no SOLR_TEST_SERVER provided";

	$server .= '/markov';
}

my $rows_per_page = 7;
my @create_ids = 'A'..'Z';

t/32version.t  view on Meta::CPAN

#!/usr/bin/env perl

use warnings;
use strict;

use Test::More;

use lib 'lib';
use Apache::Solr::JSON;

use Data::Dumper;
$Data::Dumper::Indent = 1;
$Data::Dumper::Quotekeys = 0;

my $server;
BEGIN {
    $server = $ENV{SOLR_TEST_SERVER}
        or plan skip_all => "no SOLR_TEST_SERVER provided";
}

my $solr = Apache::Solr::JSON->new
  ( server     => $server
  , retry_max  => 3