| line |
true |
false |
branch |
|
36
|
0 |
1 |
if exists $ENV{'HOME'} and -e "$ENV{'HOME'}/.tsmrc" |
|
37
|
0 |
1 |
if -e '.tsmrc' |
|
46
|
0 |
1 |
if $parameter{'id'} |
|
47
|
0 |
1 |
if $parameter{'pa'} |
|
52
|
0 |
1 |
if (not defined $$instance{'id'} and $parameter{'file'}) |
|
53
|
0 |
0 |
unless open TSMRC, "$parameter{'file'}" |
|
55
|
0 |
0 |
if /^ID\s+(.*)$/ |
|
56
|
0 |
0 |
if /^PA\s+(.*)$/ |
|
58
|
0 |
0 |
unless close TSMRC |
|
63
|
1 |
0 |
unless ($$instance{'id'} and $$instance{'pa'}) |
|
64
|
0 |
1 |
if (-t STDIN) |
|
66
|
0 |
0 |
unless ($$instance{'id'}) |
|
70
|
0 |
0 |
unless ($$instance{'pa'}) |
|
84
|
1 |
0 |
unless ($$instance{'id'} and $$instance{'pa'}) |
|
103
|
0 |
0 |
unless open DSMADMC, qq[dsmadmc -ID=$$instance{'id'} -PA=$$instance{'pa'} $options "$command"
|
|
110
|
0 |
0 |
if /^(ANS800[12]I).*(\d+)\.$/ |
|
111
|
0 |
0 |
if (/^(ANS8000I)/) |
|
116
|
0 |
0 |
if ($start and not /^\s*$/) |
|
122
|
0 |
0 |
unless close DSMADMC |
|
225
|
0 |
0 |
if $element =~ /^(\w+)\t\d{1,2}$/ |
|
247
|
0 |
0 |
if ($columns[$i] =~ /.*\s+as\s+\"*(\w+)\"*/) |
|
248
|
0 |
0 |
if ($columns[$i] eq '*') |