blib/lib/Lingua/Lexicon/IDP.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 3 | 6 | 50.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
67 | 7 | 0 | 5 | exists $$self{'__fh'} and $$self{'__datafile'} ne $data |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
33 | 0 | 7 | 0 | $$self{'__datadir'} ||= join('/', (grep {-d $_;} map({catdir($_, split(/::/, 'Lingua::Lexicon::IDP', 0));} exists $INC{'blib.pm'} ? grep({/blib/;} @INC) : @INC))[0], 'Data') |