CPAN::Groonga

ake_path( $spooldir, { verbose => 1 } )
	unless -d $spooldir;

    $statefile = spoolfile(".state.json");

    $pluginfilter = ".";
    if ( @ARGV ) {
	$pluginfilter = "^(?:" . join("|", @ARGV) . ")\\

cessing statistics.
    statistics();
}

################ State subroutines ################

use JSON;

my $state;

sub get_state {
    my $opts = { split => 0, fail => "soft" };
    my $data = loadl

ile, $opts );
    if ( $opts->{error} ) {
	$state = { comics => { } };
    }
    else {
	$state = JSON->new->decode($data);
	if ( $refresh ) {
	    delete( $_->{md5} )
	      foreach values( %{ $state