def parse_perlcritic(lines):
    for line in lines:
        info = LINE_EXPR.match(line)
        if info is None:
            continue
        info = info.groupdict()

        yield Issue(cwe=None,
                    testid=info['testid'],
                    location=Location(
                        file=File(info['file'], None),
                        function=None,
                        point=Point(int(info['line']),
                                    int(info['column']))),
                    severity=info['severity'],
                    message=Message(text=info['message']),
                    notes=None,
                    trace=None)
dataset/ETHPy150Open Debian/debile/debile/slave/wrappers/perlcritic.py/parse_perlcritic/original