line | % | coverage | branch |
60 | 100 | T | F | if (keys %main::_::) |
160 | 100 | T | F | if (@_ == 2) |
161 | 50 | T | F | if @_ == 2 |
163 | 50 | T | F | if (@_ == 1) { } |
194 | 100 | T | F | unless defined $_[0] |
195 | 100 | T | F | if defined &Scalar::Util::reftype($_[0]) and not defined &Scalar::Util::blessed($_[0]) |
202 | 100 | T | F | unless defined $_[0] |
203 | 100 | T | F | if 'SCALAR' eq ref $_[0] or overload::Method($_[0], '${}') |
210 | 100 | T | F | unless defined $_[0] |
211 | 100 | T | F | if 'ARRAY' eq ref $_[0] or overload::Method($_[0], '@{}') |
218 | 100 | T | F | unless defined $_[0] |
219 | 100 | T | F | if 'HASH' eq ref $_[0] or overload::Method($_[0], '%{}') |
226 | 100 | T | F | unless defined $_[0] |
227 | 100 | T | F | if 'CODE' eq ref $_[0] or overload::Method($_[0], '&{}') |
234 | 100 | T | F | unless defined $_[0] |
235 | 100 | T | F | if 'GLOB' eq ref $_[0] or overload::Method($_[0], '*{}') |
242 | 100 | T | F | unless defined &Scalar::Util::blessed($_[0]) |
243 | 50 | T | F | if 'Regexp' eq ref $_[0] or overload::Method($_[0], 'qr') |
301 | 100 | T | F | if defined $_[0] and not defined &Scalar::Util::reftype($_[0]) and $_[0] =~ /\A [-]? [0-9]+ \z/x |
309 | 100 | T | F | if defined $_[0] and not defined &Scalar::Util::reftype($_[0]) and $_[0] =~ /\A [0-9]+ \z/x |
317 | 100 | T | F | if defined $_[0] and not defined &Scalar::Util::reftype($_[0]) |
324 | 100 | T | F | if defined $_[0] and $_[0] =~ /\A [^\W\d]\w* \z/x |
331 | 100 | T | F | if defined $_[0] and $_[0] =~ /\A [^\W\d]\w* (?: [:][:]\w+ )* \z/x |
338 | 0 | T | F | if &_::is_package($_[0]) and $_[0]->isa($_[1]) |
345 | 0 | T | F | if &_::is_package($_[0]) and $_[0]->DOES($_[1]) |
352 | 0 | T | F | if &Scalar::Util::blessed($_[0]) and $_[0]->DOES($_[1]) |