Branch Coverage

lib/PAGI/App/Throttle.pm
Criterion Covered Total %
branch 10 16 62.5


line true false branch
52 5 2 $key_for ? :
67 0 7 if $bucket->{'tokens'} > $burst
71 5 2 if ($bucket->{'tokens'} >= 1) { }
76 5 0 if ($add_headers)
79 5 5 if ($event->{'type'} eq "http.response.start")
95 0 2 if ($on_limit) { }
103 2 0 if ($add_headers)
142 0 0 unless $buckets{$key}