blib/lib/Package/Subroutine.pm | |||
---|---|---|---|

Criterion | Covered | Total | % |

branch | 6 | 18 | 33.3 |

line | true | false | branch |
---|---|---|---|

14 | 1 | 0 | if $from eq '_' |

23 | 0 | 0 | if $from eq '_' |

32 | 0 | 0 | if $_[0] eq '_' |

45 | 1 | 0 | if (@_ == 1) |

59 | 0 | 25 | if ref $_ eq 'ARRAY' |

68 | 0 | 0 | if (defined $num) |

70 | 0 | 0 | $@ ? : |

83 | 0 | 2 | unless ($subname) |

88 | 1 | 1 | unless *{"${namespace}::$subname";}{'CODE'} |