| line | true | false | branch | 
 
| 44 | 0 | 0 | if ref $data eq ref '' | 
 
| 53 | 0 | 0 | if is_lower($c) | 
 
| 54 | 0 | 0 | if is_upper($c) | 
 
| 55 | 0 | 0 | if $c eq '_' | 
 
| 97 | 0 | 0 | if is_digit($c) | 
 
| 98 | 0 | 0 | if is_alpha($c) | 
 
| 104 | 0 | 0 | if is_digit($c) | 
 
| 106 | 0 | 0 | if $i >= 65 and $i <= 70 | 
 
| 107 | 0 | 0 | if $i >= 97 and $i <= 102 | 
 
| 116 | 0 | 0 | if index($str, $start) == 0 | 
 
| 190 | 0 | 0 | if ($to > 0) | 
 
| 195 | 0 | 0 | if (defined $to) | 
 
| 275 | 0 | 0 | unless -e $file | 
 
| 277 | 0 | 0 | unless open my $fh, '<', $file | 
 
| 283 | 0 | 0 | unless open my $fh, '>', $file | 
 
| 290 | 0 | 0 | if (not -e $file) { } | 
 
| 300 | 0 | 0 | if (-e $file and -e $to_file) |