| line |
true |
false |
branch |
|
29
|
0 |
24 |
unless my $dir = $init{'dir'} |
|
30
|
15 |
9 |
unless (-d $dir) |
|
31
|
0 |
15 |
unless mkdir $dir, 511 |
|
33
|
0 |
24 |
unless -d $dir |
|
36
|
24 |
0 |
unless $index_file =~ m[^\.?/] |
|
56
|
0 |
0 |
unless -e "$dir/$token" |
|
61
|
0 |
0 |
unless $tries |
|
75
|
116 |
0 |
if $token eq '' |
|
77
|
0 |
116 |
unless -e $file_name |
|
78
|
0 |
116 |
unless unlink $file_name |
|
84
|
2170 |
0 |
if $token eq '' |
|
87
|
0 |
2170 |
if $@ |
|
95
|
642 |
1485 |
if defined $token and $token eq '' |
|
97
|
1485 |
0 |
unless defined $token or $$self{'generic_filenames'} |
|
99
|
0 |
2127 |
if not defined $token or $token eq '' |
|
104
|
0 |
2127 |
if $@ |
|
105
|
2127 |
0 |
if $key eq $token |
|
106
|
0 |
2127 |
if $@ |