| blib/lib/Catalyst/Helper.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 3 | 35 | 8.5 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 39 | 3 | 0 | 0 | -d 'inc/.author' and -f 'lib/Catalyst/Helper.pm' |
| 255 | 0 | 3 | 0 | -e $file and -s _ |
| line | l | !l | condition |
|---|---|---|---|
| 116 | 0 | 0 | $ENV{'AUTHOR'} || eval { do { @{[getpwuid $<];}[6] } } || 'Catalyst developer' |
| 150 | 0 | 0 | $ENV{'AUTHOR'} || eval { do { @{[getpwuid $<];}[6] } } || 'A clever guy' |
| 170 | 0 | 0 | shift() || 'Missing name for model/view/controller' |
| 319 | 3 | 0 | $vars ||= {} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 95 | 0 | 0 | 0 | $name =~ /[^\w:]/ or $name =~ /^\d/ |
| 0 | 0 | 0 | $name =~ /[^\w:]/ or $name =~ /^\d/ or $name =~ /\b:\b|:{3,}/ | |
| 116 | 0 | 0 | 0 | $self->{'author'} ||= $ENV{'AUTHOR'} || eval { do { @{[getpwuid $<];}[6] } } || 'Catalyst developer' |
| 121 | 0 | 0 | 0 | $self->{'scripts'} || $self->{'makefile'} |
| 152 | 0 | 0 | 0 | $self->{'base'} ||= dir($FindBin::Bin, '..') |
| 260 | 0 | 0 | 0 | $self->{'.newfiles'} or $self->{'scripts'} |
| 0 | 0 | 0 | $self->{'.newfiles'} or $self->{'scripts'} or $self->{'makefile'} |