line |
% |
coverage |
condition |
91
|
67 |
A |
B |
dec |
0 |
X |
0 |
1 |
0 |
0 |
1 |
1 |
1 |
|
@ARGV and $ARGV[0] =~ /^-/ |
93
|
33 |
A |
B |
dec |
0 |
0 |
0 |
0 |
1 |
1 |
1 |
X |
1 |
|
$opt eq '-h' or $opt eq '--help' |
|
33 |
A |
B |
dec |
0 |
0 |
0 |
0 |
1 |
1 |
1 |
X |
1 |
|
$opt eq '-v' or $opt eq '--verbose' |
|
67 |
A |
B |
dec |
0 |
0 |
0 |
0 |
1 |
1 |
1 |
X |
1 |
|
$opt eq '-s' or $opt eq '--style' |
|
100 |
A |
B |
dec |
0 |
0 |
0 |
0 |
1 |
1 |
1 |
X |
1 |
|
$opt =~ /^-i(.*)$/ or $opt =~ /^--in_place(.*)$/ |
|
33 |
A |
B |
dec |
0 |
0 |
0 |
0 |
1 |
1 |
1 |
X |
1 |
|
$opt eq '-p' or $opt eq '--preserve' |
|
100 |
A |
B |
dec |
0 |
0 |
0 |
0 |
1 |
1 |
1 |
X |
1 |
|
$opt eq '-e' or $opt eq '--encoding' |
|
100 |
A |
B |
dec |
0 |
0 |
0 |
0 |
1 |
1 |
1 |
X |
1 |
|
$opt eq '-l' or $opt eq '--load' |
|
33 |
A |
B |
dec |
0 |
0 |
0 |
0 |
1 |
1 |
1 |
X |
1 |
|
$opt eq '-f' or $opt eq '--files' |
105
|
50 |
|
$1 || '' |
110
|
0 |
|
$opt{'preserve_space_in'} ||= [] |
133
|
33 |
A |
B |
dec |
0 |
0 |
0 |
0 |
1 |
1 |
1 |
X |
1 |
|
$opt{'style'} ||= $DEFAULT_STYLE |