CPAN::Groonga

tOptionsFromArray/;
use Fcntl qw( SEEK_SET );
use List::UtilsBy qw(max_by);
use JSON::MaybeXS qw(decode_json encode_json);

use App::ManiacDownloader::_SegmentTask;
use App::ManiacDownloader::_BytesDo

 ($self) = @_;

    open my $json_out_fh, '>:encoding(utf8)', $self->_file->_resume_info_path();
    print {$json_out_fh} encode_json( $self->_serialize );
    close($json_out_fh);

    exit(2);
}

su

nt->condvar ) );

    if ( -e $self->_file->_resume_info_path )
    {
        my $record = decode_json( _slurp( $self->_file->_resume_info_path ) );
        $self->_len( $record->{_len} );
        $se

}

sub _resume_info_path
{
    my ($self) = @_;

    return $self->_url_basename . '.mdown-resume.json';
}

1;

__END__

=pod

=encoding UTF-8

=head1 VERSION

version 0.0.13

=for :stopwords cpan tes