| Filename | /opt/flows/lib/lib/perl5/B/Hooks/EndOfScope/XS.pm |
| Statements | Executed 153 statements in 928µs |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 1 | 1 | 1 | 1.04ms | 1.40ms | B::Hooks::EndOfScope::XS::BEGIN@9 |
| 20 | 1 | 1 | 163µs | 330µs | B::Hooks::EndOfScope::XS::on_scope_end |
| 20 | 20 | 20 | 154µs | 18.5ms | B::Hooks::EndOfScope::XS::__ANON__[:17] |
| 20 | 1 | 1 | 32µs | 32µs | B::Hooks::EndOfScope::XS::__ANON__[:16] |
| 1 | 1 | 1 | 19µs | 97µs | B::Hooks::EndOfScope::XS::BEGIN@10 |
| 1 | 1 | 1 | 15µs | 30µs | B::Hooks::EndOfScope::XS::BEGIN@4 |
| 1 | 1 | 1 | 8µs | 13µs | B::Hooks::EndOfScope::XS::BEGIN@5 |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | package B::Hooks::EndOfScope::XS; | ||||
| 2 | # ABSTRACT: Execute code after a scope finished compilation - XS implementation | ||||
| 3 | |||||
| 4 | 2 | 30µs | 2 | 44µs | # spent 30µs (15+14) within B::Hooks::EndOfScope::XS::BEGIN@4 which was called:
# once (15µs+14µs) by Module::Runtime::require_module at line 4 # spent 30µs making 1 call to B::Hooks::EndOfScope::XS::BEGIN@4
# spent 14µs making 1 call to strict::import |
| 5 | 2 | 47µs | 2 | 18µs | # spent 13µs (8+5) within B::Hooks::EndOfScope::XS::BEGIN@5 which was called:
# once (8µs+5µs) by Module::Runtime::require_module at line 5 # spent 13µs making 1 call to B::Hooks::EndOfScope::XS::BEGIN@5
# spent 5µs making 1 call to warnings::import |
| 6 | |||||
| 7 | 1 | 800ns | our $VERSION = '0.20'; | ||
| 8 | |||||
| 9 | 3 | 146µs | 2 | 1.41ms | # spent 1.40ms (1.04+360µs) within B::Hooks::EndOfScope::XS::BEGIN@9 which was called:
# once (1.04ms+360µs) by Module::Runtime::require_module at line 9 # spent 1.40ms making 1 call to B::Hooks::EndOfScope::XS::BEGIN@9
# spent 11µs making 1 call to UNIVERSAL::VERSION |
| 10 | 1 | 7µs | 1 | 68µs | # spent 97µs (19+78) within B::Hooks::EndOfScope::XS::BEGIN@10 which was called:
# once (19µs+78µs) by Module::Runtime::require_module at line 13 # spent 68µs making 1 call to Sub::Exporter::Progressive::import |
| 11 | exports => ['on_scope_end'], | ||||
| 12 | groups => { default => ['on_scope_end'] }, | ||||
| 13 | 2 | 183µs | 2 | 106µs | }; # spent 97µs making 1 call to B::Hooks::EndOfScope::XS::BEGIN@10
# spent 10µs making 1 call to UNIVERSAL::VERSION |
| 14 | |||||
| 15 | my $wiz = Variable::Magic::wizard | ||||
| 16 | 20 | 63µs | # spent 32µs within B::Hooks::EndOfScope::XS::__ANON__[/opt/flows/lib/lib/perl5/B/Hooks/EndOfScope/XS.pm:16] which was called 20 times, avg 2µs/call:
# 20 times (32µs+0s) by Variable::Magic::cast at line 36, avg 2µs/call | ||
| 17 | 40 | 163µs | 20 | 18.4ms | # spent 18.5ms (154µs+18.4) within B::Hooks::EndOfScope::XS::__ANON__[/opt/flows/lib/lib/perl5/B/Hooks/EndOfScope/XS.pm:17] which was called 20 times, avg 926µs/call:
# once (7µs+6.25ms) by Module::Runtime::require_module at line 63 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Transport.pm
# once (8µs+5.86ms) by Module::Runtime::require_module at line 610 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Bulk.pm
# once (7µs+528µs) by Module::Runtime::require_module at line 165 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Role/Serializer/JSON.pm
# once (7µs+490µs) by Module::Runtime::require_module at line 207 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Role/Cxn.pm
# once (7µs+456µs) by Module::Runtime::require_module at line 296 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Role/CxnPool.pm
# once (7µs+451µs) by Module::Runtime::require_module at line 63 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Role/Transport.pm
# once (8µs+444µs) by Module::Runtime::require_module at line 130 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Role/Logger.pm
# once (7µs+423µs) by Module::Runtime::require_module at line 111 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Role/Client/Direct.pm
# once (7µs+369µs) by Module::Runtime::require_module at line 159 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Role/Cxn/HTTP.pm
# once (7µs+356µs) by Module::Runtime::require_module at line 1774 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Role/API/2_0.pm
# once (7µs+352µs) by Module::Runtime::require_module at line 275 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Role/Bulk.pm
# once (8µs+323µs) by Module::Runtime::require_module at line 35 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Logger/LogAny.pm
# once (7µs+316µs) by Module::Runtime::require_module at line 76 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Cxn/Factory.pm
# once (7µs+290µs) by Module::Runtime::require_module at line 67 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Role/CxnPool/Static.pm
# once (7µs+283µs) by Module::Runtime::require_module at line 192 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/CxnPool/Static.pm
# once (6µs+279µs) by Module::Runtime::require_module at line 61 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Role/Client.pm
# once (6µs+276µs) by Module::Runtime::require_module at line 10 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Role/Is_Sync.pm
# once (19µs+256µs) by Module::Runtime::require_module at line 15 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Serializer/JSON.pm
# once (7µs+247µs) by Module::Runtime::require_module at line 76 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Cxn/HTTPTiny.pm
# once (8µs+119µs) by main::BEGIN@147 at line 662 of /opt/flows/lib/lib/perl5/Search/Elasticsearch.pm # spent 18.4ms making 20 calls to namespace::clean::__ANON__[/opt/flows/lib/lib/perl5/namespace/clean.pm:178], avg 918µs/call |
| 18 | # When someone localise %^H, our magic doesn't want to be copied | ||||
| 19 | # down. We want it to be around only for the scope we've initially | ||||
| 20 | # attached ourselfs to. Merely having MGf_LOCAL and a noop svt_local | ||||
| 21 | # callback achieves this. If anything wants to attach more magic of our | ||||
| 22 | # kind to a localised %^H, things will continue to just work as we'll be | ||||
| 23 | # attached with a new and empty callback list. | ||||
| 24 | 1 | 5µs | 1 | 30µs | local => \undef # spent 30µs making 1 call to Variable::Magic::wizard |
| 25 | ; | ||||
| 26 | |||||
| 27 | # spent 330µs (163+166) within B::Hooks::EndOfScope::XS::on_scope_end which was called 20 times, avg 16µs/call:
# 20 times (163µs+166µs) by namespace::clean::import at line 178 of /opt/flows/lib/lib/perl5/namespace/clean.pm, avg 16µs/call | ||||
| 28 | 20 | 8µs | my $cb = shift; | ||
| 29 | |||||
| 30 | 20 | 23µs | $^H |= 0x020000; | ||
| 31 | |||||
| 32 | 20 | 119µs | 20 | 21µs | if (my $stack = Variable::Magic::getdata %^H, $wiz) { # spent 21µs making 20 calls to Variable::Magic::getdata, avg 1µs/call |
| 33 | push @{ $stack }, $cb; | ||||
| 34 | } | ||||
| 35 | else { | ||||
| 36 | 20 | 129µs | 40 | 177µs | Variable::Magic::cast %^H, $wiz, $cb; # spent 146µs making 20 calls to Variable::Magic::cast, avg 7µs/call
# spent 32µs making 20 calls to B::Hooks::EndOfScope::XS::__ANON__[/opt/flows/lib/lib/perl5/B/Hooks/EndOfScope/XS.pm:16], avg 2µs/call |
| 37 | } | ||||
| 38 | } | ||||
| 39 | |||||
| 40 | 1 | 4µs | 1; | ||
| 41 | |||||
| 42 | __END__ |