← Index
NYTProf Performance Profile   « line view »
For /Users/timbo/perl5/perlbrew/perls/perl-5.18.2/bin/perlcritic
  Run on Sat Mar 19 22:12:22 2016
Reported on Sat Mar 19 22:14:12 2016

Filename/Users/timbo/perl5/perlbrew/perls/perl-5.18.2/lib/site_perl/5.18.2/Path/FindDev.pm
StatementsExecuted 25 statements in 371µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
111779µs109msPath::FindDev::::__ANON__[:81] Path::FindDev::__ANON__[:81]
11116µs16µsFile::ShareDir::ProjectDistDir::::BEGIN@1.6File::ShareDir::ProjectDistDir::BEGIN@1.6
11110µs249µsPath::FindDev::::BEGIN@57 Path::FindDev::BEGIN@57
1118µs9µsFile::ShareDir::ProjectDistDir::::BEGIN@4.9File::ShareDir::ProjectDistDir::BEGIN@4.9
2228µs8µsPath::FindDev::::_build_find_dev Path::FindDev::_build_find_dev
1118µs12µsFile::ShareDir::ProjectDistDir::::BEGIN@3.8File::ShareDir::ProjectDistDir::BEGIN@3.8
1117µs19µsFile::ShareDir::ProjectDistDir::::BEGIN@2.7File::ShareDir::ProjectDistDir::BEGIN@2.7
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1241µs116µs
# spent 16µs within File::ShareDir::ProjectDistDir::BEGIN@1.6 which was called: # once (16µs+0s) by File::ShareDir::ProjectDistDir::BEGIN@235 at line 1
use 5.008; # utf8
# spent 16µs making 1 call to File::ShareDir::ProjectDistDir::BEGIN@1.6
2220µs232µs
# spent 19µs (7+12) within File::ShareDir::ProjectDistDir::BEGIN@2.7 which was called: # once (7µs+12µs) by File::ShareDir::ProjectDistDir::BEGIN@235 at line 2
use strict;
# spent 19µs making 1 call to File::ShareDir::ProjectDistDir::BEGIN@2.7 # spent 12µs making 1 call to strict::import
3220µs216µs
# spent 12µs (8+4) within File::ShareDir::ProjectDistDir::BEGIN@3.8 which was called: # once (8µs+4µs) by File::ShareDir::ProjectDistDir::BEGIN@235 at line 3
use warnings;
# spent 12µs making 1 call to File::ShareDir::ProjectDistDir::BEGIN@3.8 # spent 4µs making 1 call to warnings::import
4272µs211µs
# spent 9µs (8+1) within File::ShareDir::ProjectDistDir::BEGIN@4.9 which was called: # once (8µs+1µs) by File::ShareDir::ProjectDistDir::BEGIN@235 at line 4
use utf8;
# spent 9µs making 1 call to File::ShareDir::ProjectDistDir::BEGIN@4.9 # spent 2µs making 1 call to utf8::import
5
6package Path::FindDev;
71600ns$Path::FindDev::VERSION = '0.5.0';
8# ABSTRACT: Find a development path somewhere in an upper hierarchy.
9
101200nsour $AUTHORITY = 'cpan:KENTNL'; # AUTHORITY
11
- -
572128µs2488µs
# spent 249µs (10+239) within Path::FindDev::BEGIN@57 which was called: # once (10µs+239µs) by File::ShareDir::ProjectDistDir::BEGIN@235 at line 57
use Sub::Exporter -setup => { exports => [ find_dev => \&_build_find_dev, ] };
# spent 249µs making 1 call to Path::FindDev::BEGIN@57 # spent 239µs making 1 call to Sub::Exporter::__ANON__[Sub/Exporter.pm:337]
58
- -
70
# spent 8µs within Path::FindDev::_build_find_dev which was called 2 times, avg 4µs/call: # once (5µs+0s) by File::ShareDir::ProjectDistDir::BEGIN@235 at line 117 # once (3µs+0s) by Sub::Exporter::default_generator at line 419 of Sub/Exporter.pm
sub _build_find_dev {
7121µs my ( undef, undef, $arg ) = @_;
72
732200ns my $finddev_object;
74
# spent 109ms (779µs+109) within Path::FindDev::__ANON__[/Users/timbo/perl5/perlbrew/perls/perl-5.18.2/lib/site_perl/5.18.2/Path/FindDev.pm:81] which was called: # once (779µs+109ms) by File::ShareDir::ProjectDistDir::_get_cached_dist_dir_result at line 549 of File/ShareDir/ProjectDistDir.pm
return sub {
751500ns my ($path) = @_;
761500ns $finddev_object ||= do {
77157µs require Path::FindDev::Object;
7816µs167µs Path::FindDev::Object->new($arg);
# spent 67µs making 1 call to Class::Tiny::Object::new
79 };
8016µs1108ms return $finddev_object->find_dev($path);
# spent 108ms making 1 call to Path::FindDev::Object::find_dev
81212µs };
82}
83
- -
11713µs15µs*find_dev = _build_find_dev( __PACKAGE__, 'find_dev', {} );
# spent 5µs making 1 call to Path::FindDev::_build_find_dev
118
11913µs1;
120
121__END__