blib/lib/WebService/Async/Segment/Customer.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 26 | 28 | 92.8 |
line | true | false | branch |
---|---|---|---|
47 | 1 | 6 | unless $args{'api_client'} |
49 | 1 | 5 | unless $api_client->isa("WebService::Async::Segment") |
53 | 1 | 4 | if $args{'userId'} |
54 | 1 | 4 | if $args{'anonymousId'} |
57 | 2 | 3 | if $args{'traits'} |
132 | 0 | 6 | if $self->traits |
134 | 1 | 5 | if $args{'userId'} |
135 | 1 | 5 | if $args{'anonymousId'} |
142 | 8 | 2 | if $args{$_} |
144 | 1 | 4 | if $args{'traits'} |
183 | 1 | 4 | unless $args{'event'} |
196 | 5 | 14 | unless grep {$field eq $_;} @$accepted_fields |
200 | 8 | 12 | if $self->$_ |
203 | 19 | 0 | $args->{$_} ? : |