{"comment":{"url":"https://api.github.com/repos/bugdebugger/autodie/comments/11344003","html_url":"https://github.com/bugdebugger/autodie/commit/2662d92214c1713e097c680bc7e61f0c54ef9d81#commitcomment-11344003","id":11344003,"user":{"login":"nthykier","id":429402,"avatar_url":"https://avatars.githubusercontent.com/u/429402?v=3","gravatar_id":"","url":"https://api.github.com/users/nthykier","html_url":"https://github.com/nthykier","followers_url":"https://api.github.com/users/nthykier/followers","following_url":"https://api.github.com/users/nthykier/following{/other_user}","gists_url":"https://api.github.com/users/nthykier/gists{/gist_id}","starred_url":"https://api.github.com/users/nthykier/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/nthykier/subscriptions","organizations_url":"https://api.github.com/users/nthykier/orgs","repos_url":"https://api.github.com/users/nthykier/repos","events_url":"https://api.github.com/users/nthykier/events{/privacy}","received_events_url":"https://api.github.com/users/nthykier/received_events","type":"User","site_admin":false},"position":11,"line":323,"path":"lib/autodie/exception.pm","commit_id":"2662d92214c1713e097c680bc7e61f0c54ef9d81","created_at":"2015-05-24T20:27:59Z","updated_at":"2015-05-24T20:27:59Z","body":"The \"/r\" flag is only available since Perl 5.14.  I believe the following backwards compatible alternative should work just fine\r\n\r\n```perl\r\nsub _trim_package_name {\r\n    my ($self, $name) = @_;\r\n    $name =~ s/.*:://;\r\n    return $name;\r\n}\r\n```"}}