| line |
true |
false |
branch |
|
73
|
0 |
1 |
unless my $self = shift() |
|
90
|
0 |
1 |
if @_ < 4 |
|
98
|
0 |
1 |
if $DEBUG > 1 |
|
99
|
0 |
1 |
if $DEBUG > 2 |
|
104
|
0 |
1 |
if (ref $handlers ne 'HASH' or ref $listref ne 'ARRAY') |
|
116
|
0 |
1 |
unless ($title) |
|
124
|
1 |
0 |
if (my $s = $$self{'ticker_string'}) |
|
148
|
0 |
0 |
unless my $self = shift() |
|
150
|
0 |
0 |
if $DEBUG > 1 |
|
172
|
0 |
0 |
if ($$self{'threads'}) |
|
218
|
0 |
1 |
unless my $self = shift() |
|
225
|
0 |
1 |
if $DEBUG > 1 |
|
227
|
0 |
1 |
if $count |
|
257
|
0 |
0 |
unless my $self = shift() |
|
262
|
0 |
0 |
if $DEBUG > 1 |
|
265
|
0 |
0 |
if $room |
|
282
|
0 |
0 |
if ($c = $b->first_child('room')) |
|
295
|
0 |
0 |
unless my $self = shift() |
|
299
|
0 |
0 |
if $DEBUG > 1 |
|
319
|
0 |
0 |
unless my $self = shift() |
|
327
|
0 |
0 |
if $DEBUG > 1 |
|
331
|
0 |
0 |
if $written_by |
|
332
|
0 |
0 |
if $cooled_by |
|
333
|
0 |
0 |
if $count |
|
334
|
0 |
0 |
if $offset |
|
363
|
0 |
0 |
unless my $self = shift() |
|
368
|
0 |
0 |
if $DEBUG > 1 |
|
372
|
0 |
0 |
if $count |
|
396
|
0 |
0 |
unless my $self = shift() |
|
404
|
0 |
0 |
if $DEBUG > 1 |
|
429
|
0 |
0 |
if (@users) |
|
431
|
0 |
0 |
unless (int $u) |
|
436
|
0 |
0 |
$string ? : |
|
444
|
0 |
0 |
unless my $self = shift() |
|
448
|
0 |
0 |
if $DEBUG > 1 |
|
471
|
0 |
0 |
unless my $self = shift() |
|
476
|
0 |
0 |
if $DEBUG > 1 |
|
479
|
0 |
0 |
if $nogods |
|
504
|
0 |
0 |
unless my $self = shift() |
|
509
|
0 |
0 |
if $DEBUG > 1 |
|
511
|
0 |
0 |
unless ($self->logged_in) |
|
515
|
0 |
0 |
if $node_id |
|
534
|
0 |
0 |
unless my $self = shift() |
|
538
|
0 |
0 |
if $DEBUG > 1 |
|
554
|
0 |
0 |
unless my $self = shift() |
|
558
|
0 |
0 |
if $DEBUG > 1 |
|
583
|
0 |
0 |
unless my $self = shift() |
|
589
|
0 |
0 |
unless my $self = shift() |
|
594
|
0 |
0 |
unless my $self = shift() |