File Coverage

blib/lib/Sentry/Logger.pm

Criterion	Covered	Total	%
statement	37	50	74.0
branch	1	4	25.0
condition	2	3	66.6
subroutine	8	11	72.7
pod	0	5	0.0
total	48	73	65.7

use Mojo::Base -base, -signatures;

use Exporter qw(import);
use List::Util 'any';

our @EXPORT_OK = qw(logger);

has context         => 'Sentry';
has active_contexts => sub { [split(/,/, $ENV{DEBUG} // '')] };

  return any { $context =~ $_ } $self->active_contexts->@*;
}

  return unless $self->_should_print($context);
  print { $error ? *STDERR : *STDOUT } qq{[$context] $message\n};
}

  $self->_print($message, $context);
}

  $self->_print($message, $context, 1);
}

  $self->_print($message, $context, 1);
}

  $self->enabled(1);
}

my $Instance;

  $Instance //= Sentry::Logger->new;
  return $Instance;
}

1;