line |
true |
false |
branch |
97
|
0 |
0 |
if (defined $env and not exists $environments{$env}) |
102
|
0 |
0 |
if (defined $env) { } |
114
|
0 |
0 |
if (not defined $$self{'username'} or $$self{'username'} eq '') |
117
|
0 |
0 |
if (not defined $$self{'domain'} or $$self{'domain'} eq '') |
120
|
0 |
0 |
if (not defined $$self{'password'} or $$self{'password'} eq '') |
127
|
0 |
0 |
unless (exists $arg{'Timeout'}) |
131
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug) |
153
|
0 |
0 |
if ($r_code != 0) |
162
|
0 |
0 |
if (defined $error) |
181
|
0 |
0 |
if ($r_code != 0) |
199
|
0 |
0 |
if (defined $level and $level =~ /^\d+$/) |
203
|
0 |
0 |
if (defined $debug_cb and ref $debug_cb eq 'CODE') |
238
|
0 |
0 |
if (defined $error) |
258
|
0 |
0 |
if (defined $error) |
275
|
0 |
0 |
if (defined $error) |
294
|
0 |
0 |
if (defined $error) |
313
|
0 |
0 |
if (defined $error) |
332
|
0 |
0 |
if (defined $error) |
351
|
0 |
0 |
if (defined $error) |
370
|
0 |
0 |
if (defined $error) |
390
|
0 |
0 |
if (defined $error) |
410
|
0 |
0 |
if (defined $error) |
429
|
0 |
0 |
if (defined $error) |
449
|
0 |
0 |
if (defined $error) |
468
|
0 |
0 |
if (defined $error) |
488
|
0 |
0 |
if (defined $error) |
507
|
0 |
0 |
if (defined $error) |
527
|
0 |
0 |
if (defined $error) |
546
|
0 |
0 |
if (defined $error) |
565
|
0 |
0 |
if (defined $error) |
584
|
0 |
0 |
if (defined $error) |
603
|
0 |
0 |
if (defined $error) |
623
|
0 |
0 |
if (defined $error) |
644
|
0 |
0 |
if (defined $error) |
664
|
0 |
0 |
if (defined $error) |
682
|
0 |
0 |
if (defined $error) |
701
|
0 |
0 |
if (defined $error) |
721
|
0 |
0 |
if (defined $error) |
741
|
0 |
0 |
if (defined $error) |
761
|
0 |
0 |
if (defined $error) |
780
|
0 |
0 |
if (defined $error) |
802
|
0 |
0 |
if (defined $error) |
821
|
0 |
0 |
if (defined $error) |
840
|
0 |
0 |
if (defined $error) |
859
|
0 |
0 |
if (defined $error) |
878
|
0 |
0 |
if (defined $error) |
897
|
0 |
0 |
if (defined $error) |
916
|
0 |
0 |
if (defined $error) |
936
|
0 |
0 |
if (defined $error) |
958
|
0 |
0 |
if (defined $error) |
978
|
0 |
0 |
if (defined $error) |
1000
|
0 |
0 |
if (defined $error) |
1020
|
0 |
0 |
if (defined $error) |
1042
|
0 |
0 |
if (defined $error) |
1061
|
0 |
0 |
if (defined $error) |
1080
|
0 |
0 |
if (defined $error) |
1099
|
0 |
0 |
if (defined $error) |
1123
|
0 |
0 |
if (defined $error) |
1142
|
0 |
0 |
if (defined $error) |
1162
|
0 |
0 |
if (defined $error) |
1183
|
0 |
0 |
if (defined $error) |
1202
|
0 |
0 |
if (defined $error) |
1221
|
0 |
0 |
if (defined $error) |
1241
|
0 |
0 |
if (defined $error) |
1261
|
0 |
0 |
if (defined $error) |
1281
|
0 |
0 |
if (defined $error) |
1301
|
0 |
0 |
if (defined $error) |
1322
|
0 |
0 |
if (defined $error) |
1343
|
0 |
0 |
if (defined $error) |
1364
|
0 |
0 |
if (defined $error) |
1383
|
0 |
0 |
if (defined $error) |
1404
|
0 |
0 |
if (defined $error) |
1426
|
0 |
0 |
if (defined $error) |
1440
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug) |
1452
|
0 |
0 |
unless $self->_initialise('Environment', $environment, 'User', $username, 'Domain', $domain, 'Password', $password) |
1457
|
0 |
0 |
unless ($self->login) |
1472
|
0 |
0 |
if (exists $params{'Required'}) |
1475
|
0 |
0 |
unless (exists $$args{$r} and defined $$args{$r}) |
1484
|
0 |
0 |
if (exists $params{'Optional'}) |
1490
|
0 |
0 |
if (exists $params{'Required_Optional'} and $params{'Required_Optional'} > 0) |
1494
|
0 |
0 |
if ($actual_count < $expected_count) |
1502
|
0 |
0 |
if (exists $$args{$key}) |
1511
|
0 |
0 |
if ($r_code != 0) |
1512
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug) |
1522
|
0 |
0 |
if ($r_code != 0) |
1524
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug) |
1552
|
0 |
0 |
unless ($sel->can_write($Timeout)) |
1553
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug) |
1557
|
0 |
0 |
exists &Errno::ETIMEDOUT ? : |
1561
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug) |
1567
|
0 |
0 |
if (defined $bytes) |
1575
|
0 |
0 |
if (defined $bytes) { } |
1580
|
0 |
0 |
exists &Errno::EPIPE ? : |
1597
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 1) |
1601
|
0 |
0 |
unless (defined $b) |
1607
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug) |
1611
|
0 |
0 |
if ($buf =~ /\r\n\.\r\n/ms) |
1617
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 1) |
1622
|
0 |
0 |
unless ($complete_response) |
1638
|
0 |
0 |
if ($status eq 'ER') |
1639
|
0 |
0 |
if (@response > 0) |
1640
|
0 |
0 |
unless (defined $status_text) |
1649
|
0 |
0 |
if (defined $status_text) |
1653
|
0 |
0 |
if ($status_code > 0) { } |
1667
|
0 |
0 |
if (@response == 1) { } |
|
0 |
0 |
elsif (@response > 1) { } |
1670
|
0 |
0 |
if (int keys %$row > 0) |
1701
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 1) |
1706
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 2) |
1710
|
0 |
0 |
if ($within_key and $char ne '=') { } |
|
0 |
0 |
elsif ($within_key and $char eq '=') { } |
|
0 |
0 |
elsif (not $within_key || $within_value and $char eq '"') { } |
|
0 |
0 |
elsif ($within_value and not $seen_quote and $char eq '"') { } |
|
0 |
0 |
elsif ($within_value and $seen_quote and $char eq '"') { } |
|
0 |
0 |
elsif ($within_value and $seen_quote and $char =~ /\s/) { } |
|
0 |
0 |
elsif ($within_value and not $seen_quote) { } |
1711
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 2) |
1715
|
0 |
0 |
unless ($char =~ /\s/) |
1720
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 2) |
1726
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 2) |
1734
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 2) |
1741
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 2) |
1748
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 2) |
1765
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 2) |
1772
|
0 |
0 |
if (defined $value and $value ne '' and $within_value and $seen_quote) |
1786
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 1) |
1796
|
0 |
0 |
if ($line_no == 1) { } |
|
0 |
0 |
elsif ($line eq ',') { } |
1798
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 2) |
1813
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 2) |
1817
|
0 |
0 |
if (not $within_value and $char eq '"') { } |
|
0 |
0 |
elsif ($within_value and not $seen_quote and $char eq '"') { } |
|
0 |
0 |
elsif ($within_value and $seen_quote and $char eq '"') { } |
|
0 |
0 |
elsif ($within_value and $seen_quote and $char =~ /\s/) { } |
|
0 |
0 |
elsif ($within_value and not $seen_quote) { } |
1818
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 2) |
1826
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 2) |
1833
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 2) |
1840
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 2) |
1850
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 2) |
1854
|
0 |
0 |
if (exists $keys[$column]) |
1862
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug > 2) |
1869
|
0 |
0 |
if (defined $value and $value ne '' and $within_value and $seen_quote) |
1874
|
0 |
0 |
if (exists $keys[$column]) |
1891
|
0 |
0 |
unless ($sel->can_read($Timeout)) |
1892
|
0 |
0 |
if ($Net::OpenSRS::Email_APP::Debug) |
1897
|
0 |
0 |
exists &Errno::ETIMEDOUT ? : |
1903
|
0 |
0 |
if ($bytes == 0) |
1905
|
0 |
0 |
exists &Errno::EINTR ? : |