| line |
true |
false |
branch |
|
29
|
0 |
1 |
unless defined $config |
|
45
|
0 |
5 |
if (defined $giblog->{'config'}) |
|
53
|
1 |
4 |
unless $config = eval $config_content |
|
56
|
1 |
3 |
unless (ref $config eq "HASH") |
|
75
|
2 |
10 |
unless mkdir $dir |
|
81
|
1 |
2 |
unless open my $fh, ">", $file |
|
87
|
1 |
22 |
unless open my $fh, ">", $file |
|
96
|
1 |
26 |
unless open my $fh, "<", $file |
|
116
|
1 |
13 |
unless (defined $home_dir) |
|
120
|
0 |
13 |
if (-f $home_dir) |
|
126
|
0 |
10 |
unless (defined $proto_dir) |
|
130
|
0 |
10 |
unless (-d $proto_dir) |
|
145
|
117 |
180 |
unless -f $proto_file |
|
154
|
0 |
180 |
unless copy($proto_file, $user_file) |
|
159
|
9 |
171 |
if (substr($permission, 0, 1) == 5) { } |
|
|
171 |
0 |
elsif (substr($permission, 0, 1) == 4) { } |
|
165
|
0 |
180 |
unless chmod oct $permission, $user_file |
|
175
|
0 |
9 |
unless system(@git_init_cmd_rep) == 0 |
|
180
|
0 |
9 |
unless system(@git_init_cmd_public) == 0 |
|
189
|
51 |
1 |
if (defined $home_dir) { } |
|
206
|
3 |
10 |
unless ($command_path) |
|
252
|
6 |
5 |
if (-f $static_file) { } |
|
253
|
0 |
6 |
if (-f $public_file) { } |
|
255
|
0 |
0 |
if (-s $static_file == -s $public_file and -M $static_file == -M $public_file) { } |
|
269
|
5 |
6 |
unless $do_copy |
|
274
|
0 |
6 |
unless copy($static_file, $public_file) |
|
282
|
0 |
6 |
unless chmod oct $permission, $public_file |
|
300
|
16 |
27 |
unless -f $template_file |
|
303
|
12 |
15 |
if $template_file =~ m[^\Q$templates_dir/common\E] |
|
306
|
10 |
5 |
if $template_file =~ m[^\Q$templates_dir/static\E] |
|
311
|
2 |
3 |
if $template_file_base =~ /^\./ |
|
359
|
1 |
16 |
if ($line =~ m[^
|
|
364
|
1 |
16 |
if ($pre_start) { } |
|
372
|
1 |
15 |
if ($line =~ /$inline_elements_re/) { } |
|
|
11 |
4 |
elsif ($line =~ /^[ \t\<]/) { } |
|
381
|
1 |
3 |
if (length $line) |
|
388
|
1 |
16 |
if ($original_line =~ /^
|
|
403
|
1 |
1 |
if ($content =~ /class\s*=\s*"title"[^>]*?>([^<]*?)
|
|
423
|
0 |
0 |
if (defined $base_path) |
|
438
|
0 |
0 |
if ($line =~ m[^
|
|
443
|
0 |
0 |
if ($pre_start) { } |
|
458
|
0 |
0 |
if ($original_line =~ /^
|
|
478
|
0 |
0 |
if (defined $base_path) |
|
491
|
0 |
0 |
if -d $public_file |
|
494
|
0 |
0 |
unless $public_file =~ /\.css$/ |
|
497
|
0 |
0 |
unless open my $fh, "+<", $public_file |
|
506
|
0 |
0 |
unless print $fh &encode("UTF-8", $content) |
|
509
|
0 |
0 |
unless close $fh |
|
523
|
0 |
0 |
unless ($base_path =~ m[^/]) |
|
526
|
0 |
0 |
if ($base_path =~ m[/$]) |
|
538
|
2 |
1 |
if ($content =~ /<\s*h[1-6]\b[^>]*?>([^<]*?)
|
|
560
|
2 |
1 |
if (defined $root) { } |
|
561
|
1 |
1 |
if ($file eq $root) { } |
|
590
|
1 |
2 |
if (defined $root) { } |
|
591
|
1 |
0 |
if ($file eq $root) { } |
|
616
|
0 |
1 |
unless (defined $added_content) |
|
633
|
0 |
6 |
unless (defined $added_content) |
|
647
|
1 |
0 |
if ($vars) |
|
650
|
0 |
1 |
unless ($var_name =~ /^[a-zA-Z]\w*/a) |
|
668
|
1 |
1 |
if ($content =~ /class="description"[^>]*?>([^<]*?)
|
|
690
|
2 |
1 |
if ($content =~ m[<\s?p\b[^>]*?>(.*?)<\s?/\s?p\s?>]is) { } |
|
718
|
1 |
1 |
if ($content =~ /class="keywords"[^>]*?>([^<]*?)
|
|
732
|
1 |
1 |
if ($content =~ /<\s*img\b.*?\bsrc\s*=\s*"([^"]*?)"/s) |
|
804
|
1 |
0 |
if (defined $title) |
|
820
|
1 |
0 |
if (defined $description) |
|
868
|
1 |
0 |
if (not -f $public_file) { } |
|
874
|
0 |
0 |
unless ($content eq $original_content) |
|
880
|
1 |
0 |
if ($is_need_update_public_file) |