File Coverage

blib/lib/WWW/Crawl4AI/Attempt.pm

Criterion	Covered	Total	%
statement	6	8	75.0
branch	5	8	62.5
condition	3	5	60.0
subroutine	2	3	66.6
pod	2	2	100.0
total	18	26	69.2

package WWW::Crawl4AI::Attempt;
# ABSTRACT: one strategy attempt in a WWW::Crawl4AI fallback chain
use Moo;

our $VERSION = '0.001';


has backend     => ( is => 'ro', required => 1 );


has cost_class  => ( is => 'ro', default => sub { 'cheap' } );


has ok          => ( is => 'ro', default => sub { 0 } );


has page        => ( is => 'ro' );


has signals     => ( is => 'ro', default => sub { {} } );


has why_failed  => ( is => 'ro' );


has error       => ( is => 'ro' );


has elapsed     => ( is => 'ro' );


sub to_hash {
  my ( $self ) = @_;
  my $page = $self->page || {};
  return {
    backend       => $self->backend,
    cost_class    => $self->cost_class,
    ok            => $self->ok ? \1 : \0,
    status_code   => $page->{status_code},
    final_url     => $page->{final_url} // $page->{url},
    markdown_len  => defined $page->{markdown} ? length $page->{markdown} : 0,
    signals       => $self->signals,
    why_failed    => $self->why_failed,
    ( defined $self->error   ? ( error   => "@{[ $self->error ]}" ) : () ),
    ( defined $self->elapsed ? ( elapsed => $self->elapsed )        : () ),
  };
}


sub TO_JSON { $_[0]->to_hash }


1;

__END__