line | % | coverage | condition |
195 | 100 | | defined &Scalar::Util::reftype($_[0]) and not defined &Scalar::Util::blessed($_[0]) |
203 | 67 | | 'SCALAR' eq ref $_[0] or overload::Method($_[0], '${}') |
211 | 67 | | 'ARRAY' eq ref $_[0] or overload::Method($_[0], '@{}') |
219 | 67 | | 'HASH' eq ref $_[0] or overload::Method($_[0], '%{}') |
227 | 67 | | 'CODE' eq ref $_[0] or overload::Method($_[0], '&{}') |
235 | 67 | | 'GLOB' eq ref $_[0] or overload::Method($_[0], '*{}') |
243 | 33 | | 'Regexp' eq ref $_[0] or overload::Method($_[0], 'qr') |
301 | 100 | | defined $_[0] and not defined &Scalar::Util::reftype($_[0]) and $_[0] =~ /\A [-]? [0-9]+ \z/x |
309 | 100 | | defined $_[0] and not defined &Scalar::Util::reftype($_[0]) and $_[0] =~ /\A [0-9]+ \z/x |
317 | 100 | | defined $_[0] and not defined &Scalar::Util::reftype($_[0]) |
324 | 100 | | defined $_[0] and $_[0] =~ /\A [^\W\d]\w* \z/x |
331 | 100 | | defined $_[0] and $_[0] =~ /\A [^\W\d]\w* (?: [:][:]\w+ )* \z/x |
338 | 0 | | &_::is_package($_[0]) and $_[0]->isa($_[1]) |
345 | 0 | | &_::is_package($_[0]) and $_[0]->DOES($_[1]) |
352 | 0 | | &Scalar::Util::blessed($_[0]) and $_[0]->DOES($_[1]) |