| line |
true |
false |
branch |
|
67
|
0 |
0 |
if $store
|
|
70
|
0 |
0 |
unless @names
|
|
80
|
0 |
0 |
unless @names
|
|
82
|
0 |
0 |
unless %conf and $conf{'count'}
|
|
83
|
0 |
0 |
if scalar keys %paste_cache < $conf{'count'}
|
|
112
|
0 |
0 |
unless open BODY, '>', "$dir/$new_id"
|
|
125
|
0 |
0 |
unless defined $paste
|
|
129
|
0 |
0 |
unless (open BODY, '<', "$dir/$id")
|
|
155
|
0 |
0 |
unless unlink "$dir/$id"
|
|
167
|
0 |
0 |
if ($paste_cache{$id}[3] eq $ircnet and $paste_cache{$id}[4] eq lc $channel) { }
|
|
172
|
0 |
0 |
unless (open BODY, '>', "$dir/$id")
|
|
197
|
0 |
0 |
unless $ignores{$ircnet}{lc $channel} and @{$ignores{$ircnet}{lc $channel};}
|
|
201
|
0 |
0 |
if $host =~ /^$mask$/
|
|
232
|
0 |
0 |
unless $ignores{$ircnet}{lc $channel}
|
|
261
|
0 |
0 |
if keys %{$channels{$network};}
|
|
284
|
0 |
0 |
unless (-d $dir)
|
|
287
|
0 |
0 |
if ($@)
|
|
292
|
0 |
0 |
if (-e "$dir/Index")
|
|
296
|
0 |
0 |
if (-e 'ignorelist')
|
|
301
|
0 |
0 |
if (@pastes)
|
|
303
|
0 |
0 |
if ($conf{'check'} and $conf{'expire'})
|
|
310
|
0 |
0 |
unless time - $paste_cache{$_}[0] > $conf{'expire'}
|