| line |
true |
false |
branch |
|
488
|
5 |
0 |
if (keys %$args_href) |
|
491
|
0 |
5 |
if (@names) |
|
496
|
0 |
0 |
if exists $$args_href{$name} |
|
626
|
0 |
31 |
if ($last_dest_type) |
|
630
|
6 |
25 |
if $dest_type |
|
633
|
11 |
20 |
if defined $default_val |
|
636
|
11 |
20 |
if defined $default_val |
|
637
|
0 |
31 |
if ($optional and not $arg_optional) |
|
695
|
9 |
25 |
if ($feature_args =~ /open\s*=\s*(out|in|no)/i) |
|
697
|
0 |
9 |
if ($1 =~ /out/i) { } |
|
|
0 |
9 |
elsif ($1 =~ /in/i) { } |
|
731
|
31 |
14 |
if ($$arg_names_href{$name}{'type'} eq 'f') |
|
735
|
9 |
36 |
if ($$arg_names_href{$name}{'type'} eq 'd') |
|
744
|
12 |
33 |
if ($$arg_names_href{$name}{'dest_type'}) |
|
747
|
12 |
0 |
if (defined $value) |
|
752
|
3 |
9 |
unless @values |
|
754
|
7 |
5 |
if ($open_in and $$arg_names_href{$name}{'type'} eq 'f') |
|
763
|
8 |
37 |
if ($$arg_names_href{$name}{'dest_type'} eq '*') |
|
765
|
2 |
6 |
if (not defined $value or scalar @$value == 0) |
|
767
|
1 |
1 |
if ($open_in and $$arg_names_href{$name}{'type'} eq 'f') |
|
795
|
13 |
41 |
if ($idx >= scalar @$argv_aref) |
|
798
|
2 |
11 |
if ($$arg_names_href{$name}{'dest_type'} ne '*' and not $arg_optional) |
|
804
|
1 |
51 |
unless $val |
|
807
|
42 |
9 |
if ($$arg_names_href{$name}{'direction'} eq 'i') |
|
812
|
34 |
8 |
if (not $arg_optional and $val) { } |
|
815
|
3 |
31 |
if ($$arg_names_href{$name}{'type'} eq 'f' and not -f $val) |
|
820
|
1 |
30 |
if ($$arg_names_href{$name}{'type'} eq 'd' and not -d $val) |
|
833
|
10 |
28 |
if ($open_in and $$arg_names_href{$name}{'type'} eq 'f') |
|
836
|
10 |
0 |
if ($fh) { } |
|
840
|
0 |
10 |
if ($$arg_names_href{$name}{'mode'} eq 'b') |
|
850
|
6 |
4 |
if ($$arg_names_href{$name}{'dest_type'}) { } |
|
868
|
23 |
24 |
if ($open_out) |
|
870
|
4 |
19 |
if ($$arg_names_href{$name}{'direction'} eq 'o' and $$arg_names_href{$name}{'type'} eq 'f') |
|
873
|
2 |
2 |
if ($$arg_names_href{$name}{'append'}) |
|
879
|
4 |
0 |
if ($fh) { } |
|
883
|
0 |
4 |
if ($$arg_names_href{$name}{'mode'} eq 'b') |
|
897
|
0 |
0 |
$$arg_names_href{$name}{'append'} ? : |
|
989
|
104 |
0 |
if (exists $$arg_names_href{$arg_name}) |
|
1016
|
136 |
4 |
if defined $$args_href{$arg} |
|
1048
|
63 |
2 |
if (defined $$args_href{$arg}) |
|
1081
|
68 |
2 |
if defined $$args_href{$arg} |
|
1087
|
36 |
0 |
if ($app) |
|
1102
|
68 |
2 |
if defined $$args_href{$arg} |
|
1135
|
16 |
49 |
if ($$args_names_href{$name}{'dest_type'}) |
|
1144
|
8 |
50 |
unless @args |
|
1152
|
13 |
37 |
if $$args_names_href{$name}{'dest_type'} |
|
1158
|
13 |
23 |
if ($dest_type) |
|
1165
|
1 |
12 |
if ($arg =~ /[\*\?]/) |
|
1168
|
1 |
0 |
if (@files) |
|
1176
|
12 |
1 |
if ($arg) |
|
1190
|
20 |
0 |
if ($dest_type) { } |
|
1193
|
1 |
19 |
if ($arg =~ /[\*\?]/) |
|
1196
|
1 |
0 |
if (@files) |
|
1204
|
19 |
1 |
if ($arg) |
|
1258
|
0 |
31 |
if ($arg_spec =~ /[\'\"](\w+)[\'\"]/) |
|
1267
|
31 |
0 |
if ($spec =~ s/\=(.*)$//) |
|
1274
|
6 |
25 |
if ($arg =~ /([\@\*])/i) |
|
1280
|
31 |
0 |
if ($arg =~ /([sfd])/i) |
|
1283
|
5 |
26 |
if ($arg_type eq 's') { } |
|
|
20 |
6 |
elsif ($arg_type eq 'f') { } |
|
|
6 |
0 |
elsif ($arg_type eq 'd') { } |
|
1299
|
8 |
23 |
if ($arg =~ /(i|<)/i) { } |
|
|
3 |
20 |
elsif ($arg =~ /a|>>/i) { } |
|
|
6 |
14 |
elsif ($arg =~ /(o|>)/i) { } |
|
1317
|
0 |
31 |
if ($arg =~ /\?/i) |
|
1324
|
0 |
31 |
if ($arg =~ /b/i) |