{"action":"created","issue":{"url":"https://api.github.com/repos/pjcj/Devel--Cover/issues/212","repository_url":"https://api.github.com/repos/pjcj/Devel--Cover","labels_url":"https://api.github.com/repos/pjcj/Devel--Cover/issues/212/labels{/name}","comments_url":"https://api.github.com/repos/pjcj/Devel--Cover/issues/212/comments","events_url":"https://api.github.com/repos/pjcj/Devel--Cover/issues/212/events","html_url":"https://github.com/pjcj/Devel--Cover/issues/212","id":335293525,"node_id":"MDU6SXNzdWUzMzUyOTM1MjU=","number":212,"title":"How to ignore blocks of an uncoverable condition?","user":{"login":"FROGGS","id":141968,"node_id":"MDQ6VXNlcjE0MTk2OA==","avatar_url":"https://avatars0.githubusercontent.com/u/141968?v=4","gravatar_id":"","url":"https://api.github.com/users/FROGGS","html_url":"https://github.com/FROGGS","followers_url":"https://api.github.com/users/FROGGS/followers","following_url":"https://api.github.com/users/FROGGS/following{/other_user}","gists_url":"https://api.github.com/users/FROGGS/gists{/gist_id}","starred_url":"https://api.github.com/users/FROGGS/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/FROGGS/subscriptions","organizations_url":"https://api.github.com/users/FROGGS/orgs","repos_url":"https://api.github.com/users/FROGGS/repos","events_url":"https://api.github.com/users/FROGGS/events{/privacy}","received_events_url":"https://api.github.com/users/FROGGS/received_events","type":"User","site_admin":false},"labels":[{"id":33992648,"node_id":"MDU6TGFiZWwzMzk5MjY0OA==","url":"https://api.github.com/repos/pjcj/Devel--Cover/labels/status:%20waiting%20for%20fix","name":"status: waiting for fix","color":"d7e102","default":false}],"state":"open","locked":false,"assignee":null,"assignees":[],"milestone":null,"comments":4,"created_at":"2018-06-25T07:42:47Z","updated_at":"2018-07-09T20:16:46Z","closed_at":null,"author_association":"NONE","body":"How do I let Devel::Cover ignore all three statements in the block?\r\n\r\n```perl\r\nif (!$ENV{TEST_ACTIVE}) {\r\n    do_something_that_doesnt_work_in_tests();\r\n    again_something();\r\n    ohh_noes();\r\n}\r\n```\r\n\r\nI tried everything that comes to my mind. But how to do it?"},"comment":{"url":"https://api.github.com/repos/pjcj/Devel--Cover/issues/comments/403606242","html_url":"https://github.com/pjcj/Devel--Cover/issues/212#issuecomment-403606242","issue_url":"https://api.github.com/repos/pjcj/Devel--Cover/issues/212","id":403606242,"node_id":"MDEyOklzc3VlQ29tbWVudDQwMzYwNjI0Mg==","user":{"login":"FROGGS","id":141968,"node_id":"MDQ6VXNlcjE0MTk2OA==","avatar_url":"https://avatars0.githubusercontent.com/u/141968?v=4","gravatar_id":"","url":"https://api.github.com/users/FROGGS","html_url":"https://github.com/FROGGS","followers_url":"https://api.github.com/users/FROGGS/followers","following_url":"https://api.github.com/users/FROGGS/following{/other_user}","gists_url":"https://api.github.com/users/FROGGS/gists{/gist_id}","starred_url":"https://api.github.com/users/FROGGS/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/FROGGS/subscriptions","organizations_url":"https://api.github.com/users/FROGGS/orgs","repos_url":"https://api.github.com/users/FROGGS/repos","events_url":"https://api.github.com/users/FROGGS/events{/privacy}","received_events_url":"https://api.github.com/users/FROGGS/received_events","type":"User","site_admin":false},"created_at":"2018-07-09T20:16:46Z","updated_at":"2018-07-09T20:16:46Z","author_association":"NONE","body":"Hmmm, I skimmed the code in order to gain some information, but I'm not sure anymore that I'll be of help at all...\r\n```perl\r\nsub add_branch {\r\n    my $self = shift;\r\n    my ($cc, $sc, $fc, $uc) = @_;\r\n    my %line;\r\n    for my $i (0 .. $#$fc) {\r\n        my $l = $sc->[$i][0];\r\n        unless (defined $l) {\r\n            warn \"Devel::Cover: ignoring extra branch\\n\";\r\n            return;\r\n        }\r\n        my $n = $line{$l}++;\r\n        if (my $a = $cc->{$l}[$n]) {\r\n            no warnings \"uninitialized\";\r\n            $a->[0][0] += $fc->[$i][0];\r\n            $a->[0][1] += $fc->[$i][1];\r\n            $a->[0][2] += $fc->[$i][2] if exists $fc->[$i][2];\r\n            $a->[0][3] += $fc->[$i][3] if exists $fc->[$i][3];\r\n        } else {\r\n            $cc->{$l}[$n] = [ $fc->[$i], $sc->[$i][1] ];\r\n        }\r\n        $cc->{$l}[$n][2][$_->[0]] ||= $_->[1] for @{$uc->{$l}[$n]};\r\n    }\r\n}\r\n```\r\n`$cc, $sc, $fc, $uc, $l, $n, $a`? Really? There are no comments, no speaking variable names and magic numbers all over the place. I'd need a lot more time than I had expected to get the basics of this Module. :/"}}
{"actor":{"display_login":"FROGGS"}}