Filename | /Users/ap13/perl5/lib/perl5/darwin-2level/List/Util.pm |
Statements | Executed 65 statements in 1.11ms |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
36 | 1 | 1 | 809µs | 966µs | all (xsub) | List::Util::
16 | 1 | 1 | 533µs | 812µs | any (xsub) | List::Util::
46 | 2 | 2 | 218µs | 218µs | shuffle (xsub) | List::Util::
56 | 4 | 2 | 199µs | 471µs | first (xsub) | List::Util::
13 | 13 | 13 | 162µs | 162µs | import | List::Util::
1 | 1 | 1 | 20µs | 44µs | BEGIN@9 | List::Util::
1 | 1 | 1 | 12µs | 34µs | BEGIN@30 | List::Util::
0 | 0 | 0 | 0s | 0s | key | List::Util::_Pair::
0 | 0 | 0 | 0s | 0s | value | List::Util::_Pair::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | # Copyright (c) 1997-2009 Graham Barr <gbarr@pobox.com>. All rights reserved. | ||||
2 | # This program is free software; you can redistribute it and/or | ||||
3 | # modify it under the same terms as Perl itself. | ||||
4 | # | ||||
5 | # Maintained since 2013 by Paul Evans <leonerd@leonerd.org.uk> | ||||
6 | |||||
7 | package List::Util; | ||||
8 | |||||
9 | 2 | 158µs | 2 | 68µs | # spent 44µs (20+24) within List::Util::BEGIN@9 which was called:
# once (20µs+24µs) by Moose::BEGIN@9 at line 9 # spent 44µs making 1 call to List::Util::BEGIN@9
# spent 24µs making 1 call to strict::import |
10 | 1 | 500ns | require Exporter; | ||
11 | |||||
12 | 1 | 11µs | our @ISA = qw(Exporter); | ||
13 | 1 | 6µs | our @EXPORT_OK = qw( | ||
14 | all any first min max minstr maxstr none notall product reduce sum sum0 shuffle | ||||
15 | pairmap pairgrep pairfirst pairs pairkeys pairvalues | ||||
16 | ); | ||||
17 | 1 | 500ns | our $VERSION = "1.41"; | ||
18 | 1 | 500ns | our $XS_VERSION = $VERSION; | ||
19 | 1 | 17µs | $VERSION = eval $VERSION; # spent 3µs executing statements in string eval | ||
20 | |||||
21 | 1 | 400ns | require XSLoader; | ||
22 | 1 | 524µs | 1 | 510µs | XSLoader::load('List::Util', $XS_VERSION); # spent 510µs making 1 call to XSLoader::load |
23 | |||||
24 | sub import | ||||
25 | # spent 162µs within List::Util::import which was called 13 times, avg 12µs/call:
# once (17µs+0s) by Moose::Util::MetaRole::BEGIN@8 at line 8 of Moose/Util/MetaRole.pm
# once (16µs+0s) by Class::MOP::Class::BEGIN@18 at line 18 of Class/MOP/Class.pm
# once (15µs+0s) by Moose::Util::BEGIN@12 at line 12 of Moose/Util.pm
# once (14µs+0s) by Graph::BEGIN@39 at line 39 of Graph.pm
# once (12µs+0s) by Moose::Meta::Role::Application::RoleSummation::BEGIN@8 at line 8 of Moose/Meta/Role/Application/RoleSummation.pm
# once (12µs+0s) by Moose::Meta::Class::BEGIN@9 at line 9 of Moose/Meta/Class.pm
# once (12µs+0s) by Bio::Roary::Output::NumberOfGroups::BEGIN@18 at line 18 of lib/Bio/Roary/Output/NumberOfGroups.pm
# once (11µs+0s) by Moose::Meta::Role::Application::BEGIN@9 at line 9 of Moose/Meta/Role/Application.pm
# once (11µs+0s) by Moose::Meta::TypeConstraint::Union::BEGIN@10 at line 10 of Moose/Meta/TypeConstraint/Union.pm
# once (11µs+0s) by Moose::Meta::Attribute::BEGIN@8 at line 8 of Moose/Meta/Attribute.pm
# once (11µs+0s) by Moose::Meta::Role::Attribute::BEGIN@7 at line 7 of Moose/Meta/Role/Attribute.pm
# once (10µs+0s) by Moose::Meta::Role::Application::ToInstance::BEGIN@9 at line 9 of Moose/Meta/Role/Application/ToInstance.pm
# once (10µs+0s) by Moose::Meta::TypeConstraint::DuckType::BEGIN@10 at line 10 of Moose/Meta/TypeConstraint/DuckType.pm | ||||
26 | 13 | 19µs | my $pkg = caller; | ||
27 | |||||
28 | # (RT88848) Touch the caller's $a and $b, to avoid the warning of | ||||
29 | # Name "main::a" used only once: possible typo" warning | ||||
30 | 2 | 155µs | 2 | 57µs | # spent 34µs (12+22) within List::Util::BEGIN@30 which was called:
# once (12µs+22µs) by Moose::BEGIN@9 at line 30 # spent 34µs making 1 call to List::Util::BEGIN@30
# spent 22µs making 1 call to strict::unimport |
31 | 13 | 55µs | ${"${pkg}::a"} = ${"${pkg}::a"}; | ||
32 | 13 | 39µs | ${"${pkg}::b"} = ${"${pkg}::b"}; | ||
33 | |||||
34 | 13 | 97µs | 13 | 495µs | goto &Exporter::import; # spent 495µs making 13 calls to Exporter::import, avg 38µs/call |
35 | } | ||||
36 | |||||
37 | # For objects returned by pairs() | ||||
38 | sub List::Util::_Pair::key { shift->[0] } | ||||
39 | sub List::Util::_Pair::value { shift->[1] } | ||||
40 | |||||
41 | 1 | 24µs | 1; | ||
42 | |||||
43 | __END__ | ||||
# spent 966µs (809+158) within List::Util::all which was called 36 times, avg 27µs/call:
# 36 times (809µs+158µs) by Class::MOP::Class::_check_metaclass_compatibility at line 211 of Class/MOP/Class.pm, avg 27µs/call | |||||
# spent 812µs (533+279) within List::Util::any which was called 16 times, avg 51µs/call:
# 16 times (533µs+279µs) by Moose::Meta::Class::_eval_environment at line 542 of Moose/Meta/Class.pm, avg 51µs/call | |||||
# spent 471µs (199+272) within List::Util::first which was called 56 times, avg 8µs/call:
# 52 times (168µs+263µs) by Data::OptList::__is_a at line 27 of Data/OptList.pm, avg 8µs/call
# 2 times (14µs+5µs) by Sub::Exporter::Progressive::__ANON__[/Users/ap13/perl5/lib/perl5/Sub/Exporter/Progressive.pm:40] at line 26 of Sub/Exporter/Progressive.pm, avg 10µs/call
# once (14µs+4µs) by Sub::Exporter::Progressive::sub_export_options at line 71 of Sub/Exporter/Progressive.pm
# once (2µs+0s) by Sub::Exporter::Progressive::sub_export_options at line 66 of Sub/Exporter/Progressive.pm | |||||
# spent 218µs within List::Util::shuffle which was called 46 times, avg 5µs/call:
# 36 times (187µs+0s) by Graph::_root_opt at line 2331 of Graph.pm, avg 5µs/call
# 10 times (31µs+0s) by Bio::Roary::Output::NumberOfGroups::_shuffle_input_files at line 62 of lib/Bio/Roary/Output/NumberOfGroups.pm, avg 3µs/call |