← Index
NYTProf Performance Profile   « block view • line view • sub view »
For mentat.storage.mongo.pl
  Run on Tue Jun 24 09:58:41 2014
Reported on Tue Jun 24 09:59:26 2014

Filename/usr/share/perl/5.14/strict.pm
StatementsExecuted 1110 statements in 3.50ms
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
210196189927µs950µsstrict::::importstrict::import
737332752µs1.38msstrict::::unimportstrict::unimport
7631668µs668µsstrict::::bitsstrict::bits
11134µs34µsstrict::::CORE:regcompstrict::CORE:regcomp (opcode)
11110µs10µsstrict::::CORE:matchstrict::CORE:match (opcode)
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package strict;
2
311µs$strict::VERSION = "1.04";
4
5# Verify that we're called correctly so that strictures will work.
6284µs244µsunless ( __FILE__ =~ /(^|[\/\\])\Q${\__PACKAGE__}\E\.pmc?$/ ) {
# spent 34µs making 1 call to strict::CORE:regcomp # spent 10µs making 1 call to strict::CORE:match
7 # Can't use Carp, since Carp uses us!
8 my (undef, $f, $l) = caller;
9 die("Incorrect use of pragma '${\__PACKAGE__}' at $f line $l.\n");
10}
11
1214µsmy %bitmask = (
13refs => 0x00000002,
14subs => 0x00000200,
15vars => 0x00000400
16);
17
18
# spent 668µs within strict::bits which was called 76 times, avg 9µs/call: # 73 times (628µs+0s) by strict::unimport at line 41, avg 9µs/call # 2 times (23µs+0s) by strict::import at line 36, avg 11µs/call # once (18µs+0s) by main::BEGIN@3 at line 32
sub bits {
197648µs my $bits = 0;
207625µs my @wrong;
2176142µs foreach my $s (@_) {
227955µs push @wrong, $s unless exists $bitmask{$s};
2379191µs $bits |= $bitmask{$s} || 0;
24 }
257640µs if (@wrong) {
26 require Carp;
27 Carp::croak("Unknown 'strict' tag(s) '@wrong'");
28 }
2976406µs $bits;
30}
31
3217µs118µsmy $default_bits = bits(qw(refs subs vars));
# spent 18µs making 1 call to strict::bits
33
34
# spent 950µs (927+23) within strict::import which was called 210 times, avg 5µs/call: # 14 times (32µs+0s) by Moose::Exporter::__ANON__[/usr/local/lib/perl/5.14.2/Moose/Exporter.pm:519] at line 464 of Moose/Exporter.pm, avg 2µs/call # 2 times (5µs+0s) by Moose::Exporter::import at line 782 of Moose/Exporter.pm, avg 2µs/call # once (13µs+12µs) by base::BEGIN@3 at line 3 of base.pm # once (13µs+11µs) by vars::BEGIN@8 at line 8 of vars.pm # once (16µs+0s) by DateTime::TimeZone::OlsonDB::Observance::BEGIN@9 at line 9 of DateTime/TimeZone/OlsonDB/Observance.pm # once (12µs+0s) by Time::Zone::BEGIN@46 at line 46 of Time/Zone.pm # once (9µs+0s) by main::BEGIN@3 at line 3 of mentat.storage.mongo.pl # once (8µs+0s) by Config::BEGIN@9 at line 9 of Config.pm # once (8µs+0s) by DateTime::Infinite::BEGIN@6 at line 6 of DateTime/Infinite.pm # once (8µs+0s) by Exporter::Heavy::BEGIN@3 at line 3 of Exporter/Heavy.pm # once (8µs+0s) by Data::OptList::BEGIN@1 at line 1 of Sub/Install.pm # once (8µs+0s) by Fcntl::BEGIN@3 at line 3 of Fcntl.pm # once (8µs+0s) by Class::Load::XS::BEGIN@6 at line 6 of Class/Load/XS.pm # once (8µs+0s) by Date::Parse::BEGIN@8 at line 8 of Date/Parse.pm # once (8µs+0s) by Params::Validate::Constants::BEGIN@6 at line 6 of Params/Validate/Constants.pm # once (8µs+0s) by DateTime::Locale::BEGIN@3 at line 3 of DateTime/Locale.pm # once (8µs+0s) by Params::Validate::XS::BEGIN@6 at line 6 of Params/Validate/XS.pm # once (7µs+0s) by List::Util::BEGIN@11 at line 11 of List/Util.pm # once (7µs+0s) by File::Spec::BEGIN@3 at line 3 of File/Spec.pm # once (7µs+0s) by Net::CIDR::Lite::BEGIN@3 at line 3 of Net/CIDR/Lite.pm # once (7µs+0s) by DateTime::Locale::Catalog::BEGIN@17 at line 17 of DateTime/Locale/Catalog.pm # once (7µs+0s) by Value::Convertor::BEGIN@2 at line 2 of Value/Convertor.pm # once (7µs+0s) by re::BEGIN@4 at line 4 of re.pm # once (7µs+0s) by DateTime::TimeZone::Europe::Prague::BEGIN@18 at line 18 of DateTime/TimeZone/Europe/Prague.pm # once (7µs+0s) by Math::BigInt::Calc::BEGIN@4 at line 4 of Math/BigInt/Calc.pm # once (7µs+0s) by POSIX::BEGIN@2 at line 2 of POSIX.pm # once (7µs+0s) by DateTime::Duration::BEGIN@6 at line 6 of DateTime/Duration.pm # once (7µs+0s) by constant::BEGIN@3 at line 3 of constant.pm # once (7µs+0s) by DateTime::Locale::en_US::BEGIN@21 at line 21 of DateTime/Locale/en_US.pm # once (7µs+0s) by DateTime::TimeZone::BEGIN@11 at line 11 of DateTime/TimeZone.pm # once (7µs+0s) by DateTime::BEGIN@8 at line 8 of DateTime.pm # once (7µs+0s) by Scalar::Util::BEGIN@11 at line 11 of Scalar/Util.pm # once (7µs+0s) by Sub::Name::BEGIN@44 at line 44 of Sub/Name.pm # once (7µs+0s) by DateTime::Locale::Base::BEGIN@3 at line 3 of DateTime/Locale/Base.pm # once (7µs+0s) by DateTime::TimeZone::Floating::BEGIN@9 at line 9 of DateTime/TimeZone/Floating.pm # once (7µs+0s) by Params::Util::BEGIN@59 at line 59 of Params/Util.pm # once (7µs+0s) by File::Find::BEGIN@3 at line 3 of File/Find.pm # once (7µs+0s) by File::Compare::BEGIN@4 at line 4 of File/Compare.pm # once (7µs+0s) by Class::Singleton::BEGIN@19 at line 19 of Class/Singleton.pm # once (7µs+0s) by Carp::BEGIN@4 at line 4 of Carp.pm # once (7µs+0s) by DateTime::TimeZone::Local::Unix::BEGIN@9 at line 9 of DateTime/TimeZone/Local/Unix.pm # once (7µs+0s) by File::Spec::Unix::BEGIN@3 at line 3 of File/Spec/Unix.pm # once (7µs+0s) by Module::Implementation::BEGIN@9 at line 9 of Module/Implementation.pm # once (7µs+0s) by AutoLoader::BEGIN@3 at line 3 of AutoLoader.pm # once (7µs+0s) by DateTime::TimeZone::OlsonDB::Zone::BEGIN@9 at line 9 of DateTime/TimeZone/OlsonDB/Zone.pm # once (7µs+0s) by Class::Load::BEGIN@1 at line 1 of Data/OptList.pm # once (7µs+0s) by bigint::BEGIN@10 at line 10 of bigint.pm # once (7µs+0s) by DateTime::Helpers::BEGIN@6 at line 6 of DateTime/Helpers.pm # once (7µs+0s) by Params::Validate::BEGIN@8 at line 8 of Params/Validate.pm # once (7µs+0s) by DateTime::Infinite::Future::BEGIN@44 at line 44 of DateTime/Infinite.pm # once (7µs+0s) by DateTime::TimeZone::OlsonDB::BEGIN@9 at line 9 of DateTime/TimeZone/OlsonDB.pm # once (7µs+0s) by DateTime::TimeZone::Local::BEGIN@9 at line 9 of DateTime/TimeZone/Local.pm # once (7µs+0s) by Time::HiRes::BEGIN@3 at line 3 of Time/HiRes.pm # once (7µs+0s) by DateTime::TimeZone::Catalog::BEGIN@16 at line 16 of DateTime/TimeZone/Catalog.pm # once (7µs+0s) by DateTime::TimeZone::OffsetOnly::BEGIN@9 at line 9 of DateTime/TimeZone/OffsetOnly.pm # once (7µs+0s) by List::MoreUtils::BEGIN@4 at line 4 of List/MoreUtils.pm # once (7µs+0s) by Try::Tiny::BEGIN@11 at line 11 of Try/Tiny.pm # once (7µs+0s) by Math::BigInt::BEGIN@30 at line 30 of Math/BigInt.pm # once (7µs+0s) by DateTime::Locale::en::BEGIN@21 at line 21 of DateTime/Locale/en.pm # once (6µs+0s) by DateTime::Locale::root::BEGIN@21 at line 21 of DateTime/Locale/root.pm # once (6µs+0s) by Cwd::BEGIN@3 at line 3 of Cwd.pm # once (6µs+0s) by DateTime::TimeZone::OlsonDB::Change::BEGIN@9 at line 9 of DateTime/TimeZone/OlsonDB/Change.pm # once (6µs+0s) by DateTime::Infinite::Past::BEGIN@72 at line 72 of DateTime/Infinite.pm # once (6µs+0s) by DateTime::TimeZone::OlsonDB::Rule::BEGIN@9 at line 9 of DateTime/TimeZone/OlsonDB/Rule.pm # once (6µs+0s) by parent::BEGIN@2 at line 2 of parent.pm # once (6µs+0s) by File::Find::BEGIN@349 at line 349 of File/Find.pm # once (6µs+0s) by Log::Loger::BEGIN@2 at line 2 of Log/Loger.pm # once (6µs+0s) by Time::Local::BEGIN@6 at line 6 of Time/Local.pm # once (6µs+0s) by Class::Load::BEGIN@5 at line 5 of Class/Load.pm # once (6µs+0s) by DateTime::TimeZone::UTC::BEGIN@9 at line 9 of DateTime/TimeZone/UTC.pm # once (6µs+0s) by FakeLocale::BEGIN@98 at line 98 of DateTime/Infinite.pm # once (6µs+0s) by Log::Filter::Set::BEGIN@2 at line 2 of Log/Filter/Set.pm # once (6µs+0s) by File::Basename::BEGIN@50 at line 50 of File/Basename.pm # once (3µs+0s) by Class::MOP::Attribute::BEGIN@10 at line 10 of Class/MOP/Attribute.pm # once (3µs+0s) by Log::Filter::None::BEGIN@2 at line 2 of Log/Filter/None.pm # once (3µs+0s) by Log::Writer::Email::BEGIN@2 at line 2 of Log/Writer/Email.pm # once (3µs+0s) by boolean::BEGIN@3 at line 3 of boolean.pm # once (3µs+0s) by Readonly::XS::BEGIN@18 at line 18 of Readonly/XS.pm # once (3µs+0s) by Encode::Encoding::BEGIN@4 at line 4 of Encode/Encoding.pm # once (3µs+0s) by Moose::Meta::TypeConstraint::Enum::BEGIN@9 at line 9 of Moose/Meta/TypeConstraint/Enum.pm # once (3µs+0s) by Class::MOP::Method::Constructor::BEGIN@10 at line 10 of Class/MOP/Method/Constructor.pm # once (3µs+0s) by attributes::BEGIN@9 at line 9 of attributes.pm # once (3µs+0s) by Log::Writer::Module::BEGIN@2 at line 2 of Log/Writer/Module.pm # once (3µs+0s) by Log::Writer::File::BEGIN@2 at line 2 of Log/Writer/File.pm # once (3µs+0s) by Mentat::Storage::BEGIN@2 at line 2 of Mentat/Storage.pm # once (3µs+0s) by Log::Filter::Source::BEGIN@2 at line 2 of Log/Filter/Source.pm # once (3µs+0s) by Moose::Meta::Instance::BEGIN@10 at line 10 of Moose/Meta/Instance.pm # once (3µs+0s) by Class::MOP::Method::Wrapped::BEGIN@10 at line 10 of Class/MOP/Method/Wrapped.pm # once (3µs+0s) by Moose::Meta::Role::Application::ToRole::BEGIN@9 at line 9 of Moose/Meta/Role/Application/ToRole.pm # once (3µs+0s) by Mail::Sendmail::BEGIN@38 at line 38 of Mail/Sendmail.pm # once (3µs+0s) by Digest::base::BEGIN@3 at line 3 of Digest/base.pm # once (3µs+0s) by Moose::Meta::TypeConstraint::DuckType::BEGIN@9 at line 9 of Moose/Meta/TypeConstraint/DuckType.pm # once (3µs+0s) by Log::Filter::Severity::BEGIN@2 at line 2 of Log/Filter/Severity.pm # once (3µs+0s) by Mentat::Storage::Mongo::BEGIN@2 at line 2 of Mentat/Storage/Mongo.pm # once (3µs+0s) by Log::Filter::Threshold::BEGIN@2 at line 2 of Log/Filter/Threshold.pm # once (3µs+0s) by Moose::Meta::Role::Application::ToInstance::BEGIN@9 at line 9 of Moose/Meta/Role/Application/ToInstance.pm # once (3µs+0s) by Log::Filter::Message::BEGIN@2 at line 2 of Log/Filter/Message.pm # once (3µs+0s) by Moose::Meta::Role::Method::Conflicting::BEGIN@10 at line 10 of Moose/Meta/Role/Method/Conflicting.pm # once (3µs+0s) by Log::Channel::Channel::BEGIN@2 at line 2 of Log/Channel/Channel.pm # once (3µs+0s) by Mutex::Flock::BEGIN@2 at line 2 of Mutex/Flock.pm # once (3µs+0s) by Encode::Config::BEGIN@7 at line 7 of Encode/Config.pm # once (3µs+0s) by Log::Writer::Handle::BEGIN@2 at line 2 of Log/Writer/Handle.pm # once (3µs+0s) by Class::MOP::MiniTrait::BEGIN@9 at line 9 of Class/MOP/MiniTrait.pm # once (3µs+0s) by Moose::Meta::TypeConstraint::BEGIN@10 at line 10 of Moose/Meta/TypeConstraint.pm # once (3µs+0s) by Digest::MD5::BEGIN@3 at line 3 of Digest/MD5.pm # once (3µs+0s) by Moose::Meta::Method::Accessor::BEGIN@10 at line 10 of Moose/Meta/Method/Accessor.pm # once (3µs+0s) by IO::File::BEGIN@6 at line 6 of IO/File.pm # once (3µs+0s) by Encode::BEGIN@5 at line 5 of Encode.pm # once (3µs+0s) by Moose::Meta::TypeConstraint::Class::BEGIN@9 at line 9 of Moose/Meta/TypeConstraint/Class.pm # once (3µs+0s) by Moose::Util::TypeConstraints::Builtins::BEGIN@9 at line 9 of Moose/Util/TypeConstraints/Builtins.pm # once (3µs+0s) by Moose::Meta::TypeConstraint::Role::BEGIN@9 at line 9 of Moose/Meta/TypeConstraint/Role.pm # once (3µs+0s) by Moose::Meta::Role::Composite::BEGIN@9 at line 9 of Moose/Meta/Role/Composite.pm # once (3µs+0s) by Moose::Meta::TypeCoercion::BEGIN@10 at line 10 of Moose/Meta/TypeCoercion.pm # once (3µs+0s) by MIME::QuotedPrint::BEGIN@3 at line 3 of MIME/QuotedPrint.pm # once (3µs+0s) by Log::Filter::All::BEGIN@2 at line 2 of Log/Filter/All.pm # once (3µs+0s) by Log::Writer::Std::BEGIN@2 at line 2 of Log/Writer/Std.pm # once (3µs+0s) by JSON::BEGIN@4 at line 4 of JSON.pm # once (3µs+0s) by Moose::Meta::TypeConstraint::Parameterized::BEGIN@9 at line 9 of Moose/Meta/TypeConstraint/Parameterized.pm # once (3µs+0s) by Sys::Hostname::Long::BEGIN@2 at line 2 of Sys/Hostname/Long.pm # once (3µs+0s) by Moose::Meta::TypeConstraint::Registry::BEGIN@10 at line 10 of Moose/Meta/TypeConstraint/Registry.pm # once (3µs+0s) by Class::MOP::Method::Accessor::BEGIN@10 at line 10 of Class/MOP/Method/Accessor.pm # once (3µs+0s) by Log::Writer::Syslog::BEGIN@2 at line 2 of Log/Writer/Syslog.pm # once (3µs+0s) by Moose::Meta::Attribute::BEGIN@10 at line 10 of Moose/Meta/Attribute.pm # once (3µs+0s) by Moose::Meta::Role::Application::ToClass::BEGIN@9 at line 9 of Moose/Meta/Role/Application/ToClass.pm # once (3µs+0s) by Moose::Meta::Role::Method::Required::BEGIN@10 at line 10 of Moose/Meta/Role/Method/Required.pm # once (3µs+0s) by Moose::Meta::Method::Meta::BEGIN@10 at line 10 of Moose/Meta/Method/Meta.pm # once (3µs+0s) by Class::MOP::Class::BEGIN@10 at line 10 of Class/MOP/Class.pm # once (3µs+0s) by Moose::Util::MetaRole::BEGIN@9 at line 9 of Moose/Util/MetaRole.pm # once (3µs+0s) by Log::Filter::Re::BEGIN@2 at line 2 of Log/Filter/Re.pm # once (3µs+0s) by Moose::Meta::TypeCoercion::Union::BEGIN@10 at line 10 of Moose/Meta/TypeCoercion/Union.pm # once (3µs+0s) by Moose::Meta::Role::BEGIN@9 at line 9 of Moose/Meta/Role.pm # once (3µs+0s) by Class::MOP::Class::Immutable::Trait::BEGIN@9 at line 9 of Class/MOP/Class/Immutable/Trait.pm # once (3µs+0s) by Moose::Meta::Method::Overridden::BEGIN@9 at line 9 of Moose/Meta/Method/Overridden.pm # once (3µs+0s) by Class::MOP::Method::Overload::BEGIN@10 at line 10 of Class/MOP/Method/Overload.pm # once (3µs+0s) by Moose::Exporter::BEGIN@9 at line 9 of Moose/Exporter.pm # once (3µs+0s) by Moose::Meta::Role::Application::RoleSummation::BEGIN@9 at line 9 of Moose/Meta/Role/Application/RoleSummation.pm # once (3µs+0s) by Mentat::Storage::Mongo::BEGIN@18 at line 18 of MongoDB.pm # once (3µs+0s) by Log::Core::Essentials::BEGIN@2 at line 2 of Log/Core/Essentials.pm # once (3µs+0s) by Moose::Meta::Mixin::AttributeCore::BEGIN@9 at line 9 of Moose/Meta/Mixin/AttributeCore.pm # once (3µs+0s) by Moose::Exporter::BEGIN@2.9 at line 2 of Sub/Exporter.pm # once (3µs+0s) by Moose::Meta::Class::Immutable::Trait::BEGIN@9 at line 9 of Moose/Meta/Class/Immutable/Trait.pm # once (3µs+0s) by Moose::Meta::Method::Destructor::BEGIN@10 at line 10 of Moose/Meta/Method/Destructor.pm # once (3µs+0s) by Log::Filter::Module::BEGIN@2 at line 2 of Log/Filter/Module.pm # once (3µs+0s) by Moose::Meta::Role::Method::BEGIN@10 at line 10 of Moose/Meta/Role/Method.pm # once (3µs+0s) by Class::MOP::Deprecated::BEGIN@9 at line 9 of Class/MOP/Deprecated.pm # once (3µs+0s) by Log::Channel::Module::BEGIN@2 at line 2 of Log/Channel/Module.pm # once (3µs+0s) by MIME::Base64::BEGIN@3 at line 3 of MIME/Base64.pm # once (3µs+0s) by Tie::IxHash::BEGIN@12 at line 12 of Tie/IxHash.pm # once (3µs+0s) by boolean::BEGIN@14.11 at line 14 of Readonly.pm # once (3µs+0s) by Package::DeprecationManager::BEGIN@6 at line 6 of Package/DeprecationManager.pm # once (3µs+0s) by Moose::Meta::Role::Application::BEGIN@9 at line 9 of Moose/Meta/Role/Application.pm # once (3µs+0s) by Moose::Meta::TypeConstraint::Parameterizable::BEGIN@9 at line 9 of Moose/Meta/TypeConstraint/Parameterizable.pm # once (3µs+0s) by Moose::Meta::Role::Attribute::BEGIN@9 at line 9 of Moose/Meta/Role/Attribute.pm # once (3µs+0s) by Class::MOP::Method::Generated::BEGIN@10 at line 10 of Class/MOP/Method/Generated.pm # once (3µs+0s) by IO::Handle::BEGIN@4 at line 4 of IO/Handle.pm # once (3µs+0s) by Sys::Syslog::BEGIN@2 at line 2 of Sys/Syslog.pm # once (3µs+0s) by Class::MOP::Mixin::HasAttributes::BEGIN@9 at line 9 of Class/MOP/Mixin/HasAttributes.pm # once (3µs+0s) by Package::Stash::XS::BEGIN@8 at line 8 of Package/Stash/XS.pm # once (3µs+0s) by Encode::Alias::BEGIN@2 at line 2 of Encode/Alias.pm # once (3µs+0s) by Moose::Object::BEGIN@10 at line 10 of Moose/Object.pm # once (3µs+0s) by Class::MOP::Mixin::AttributeCore::BEGIN@9 at line 9 of Class/MOP/Mixin/AttributeCore.pm # once (3µs+0s) by Moose::Util::BEGIN@9 at line 9 of Moose/Util.pm # once (3µs+0s) by Moose::Meta::Method::Constructor::BEGIN@10 at line 10 of Moose/Meta/Method/Constructor.pm # once (3µs+0s) by Moose::Error::Util::BEGIN@4 at line 4 of Moose/Error/Util.pm # once (3µs+0s) by Clone::BEGIN@4 at line 4 of Clone.pm # once (3µs+0s) by Moose::BEGIN@8 at line 8 of Moose.pm # once (3µs+0s) by mro::BEGIN@10 at line 10 of mro.pm # once (3µs+0s) by Class::MOP::Module::BEGIN@10 at line 10 of Class/MOP/Module.pm # once (3µs+0s) by Package::Stash::BEGIN@8 at line 8 of Package/Stash.pm # once (3µs+0s) by Class::MOP::Mixin::HasMethods::BEGIN@9 at line 9 of Class/MOP/Mixin/HasMethods.pm # once (3µs+0s) by Moose::Meta::Method::Delegation::BEGIN@10 at line 10 of Moose/Meta/Method/Delegation.pm # once (3µs+0s) by Class::MOP::Package::BEGIN@10 at line 10 of Class/MOP/Package.pm # once (3µs+0s) by Moose::Meta::Method::Augmented::BEGIN@9 at line 9 of Moose/Meta/Method/Augmented.pm # once (3µs+0s) by MRO::Compat::BEGIN@2 at line 2 of MRO/Compat.pm # once (3µs+0s) by Class::MOP::Method::Inlined::BEGIN@9 at line 9 of Class/MOP/Method/Inlined.pm # once (3µs+0s) by Devel::GlobalDestruction::BEGIN@3 at line 3 of Devel/GlobalDestruction.pm # once (3µs+0s) by Moose::Deprecated::BEGIN@9 at line 9 of Moose/Deprecated.pm # once (3µs+0s) by Sub::Exporter::Progressive::BEGIN@3 at line 3 of Sub/Exporter/Progressive.pm # once (3µs+0s) by IO::Seekable::BEGIN@7 at line 7 of IO/Seekable.pm # once (3µs+0s) by B::BEGIN@9 at line 9 of B.pm # once (3µs+0s) by Class::MOP::Method::BEGIN@10 at line 10 of Class/MOP/Method.pm # once (3µs+0s) by Socket::BEGIN@3 at line 3 of Socket.pm # once (3µs+0s) by Moose::Error::Default::BEGIN@9 at line 9 of Moose/Error/Default.pm # once (3µs+0s) by Class::MOP::BEGIN@10 at line 10 of Class/MOP.pm # once (3µs+0s) by Moose::Meta::Class::BEGIN@10 at line 10 of Moose/Meta/Class.pm # once (3µs+0s) by Moose::Meta::TypeConstraint::Union::BEGIN@10 at line 10 of Moose/Meta/TypeConstraint/Union.pm # once (3µs+0s) by metaclass::BEGIN@10 at line 10 of metaclass.pm # once (3µs+0s) by Class::MOP::Instance::BEGIN@10 at line 10 of Class/MOP/Instance.pm # once (3µs+0s) by Class::MOP::Method::Meta::BEGIN@10 at line 10 of Class/MOP/Method/Meta.pm # once (3µs+0s) by Class::MOP::Mixin::BEGIN@9 at line 9 of Class/MOP/Mixin.pm # once (3µs+0s) by Moose::Meta::Method::BEGIN@9 at line 9 of Moose/Meta/Method.pm # once (3µs+0s) by Sys::Hostname::BEGIN@3 at line 3 of Sys/Hostname.pm # once (3µs+0s) by IO::BEGIN@7 at line 7 of IO.pm # once (3µs+0s) by Sub::Exporter::Progressive::BEGIN@23 at line 23 of Sub/Exporter/Progressive.pm # once (3µs+0s) by Class::MOP::Object::BEGIN@10 at line 10 of Class/MOP/Object.pm # once (2µs+0s) by Eval::Closure::BEGIN@8 at line 8 of Eval/Closure.pm
sub import {
3521065µs shift;
362101.65ms223µs $^H |= @_ ? bits(@_) : $default_bits;
# spent 23µs making 2 calls to strict::bits, avg 11µs/call
37}
38
39
# spent 1.38ms (752µs+628µs) within strict::unimport which was called 73 times, avg 19µs/call: # once (16µs+20µs) by Time::HiRes::BEGIN@42 at line 42 of Time/HiRes.pm # once (13µs+17µs) by Carp::BEGIN@131 at line 131 of Carp.pm # once (19µs+11µs) by AutoLoader::BEGIN@30 at line 30 of AutoLoader.pm # once (19µs+11µs) by Math::BigInt::BEGIN@943 at line 943 of Math/BigInt.pm # once (19µs+11µs) by Config::BEGIN@45 at line 45 of Config.pm # once (15µs+12µs) by Cwd::BEGIN@642 at line 642 of Cwd.pm # once (15µs+12µs) by Math::BigInt::BEGIN@3069 at line 3069 of Math/BigInt.pm # once (15µs+11µs) by Math::BigInt::BEGIN@2623 at line 2623 of Math/BigInt.pm # once (14µs+12µs) by constant::BEGIN@114 at line 114 of constant.pm # once (15µs+12µs) by Carp::BEGIN@555 at line 555 of Carp.pm # once (14µs+12µs) by bigint::BEGIN@269 at line 269 of bigint.pm # once (12µs+14µs) by Class::Singleton::BEGIN@56 at line 56 of Class/Singleton.pm # once (14µs+11µs) by Module::Implementation::BEGIN@123 at line 123 of Module/Implementation.pm # once (14µs+11µs) by Sub::Install::BEGIN@109 at line 109 of Sub/Install.pm # once (14µs+11µs) by DateTime::Locale::Base::BEGIN@363 at line 363 of DateTime/Locale/Base.pm # once (14µs+11µs) by AutoLoader::BEGIN@138 at line 138 of AutoLoader.pm # once (13µs+12µs) by parent::BEGIN@25 at line 25 of parent.pm # once (14µs+11µs) by File::Spec::Unix::BEGIN@65 at line 65 of File/Spec/Unix.pm # once (14µs+11µs) by DateTime::Locale::Base::BEGIN@176 at line 176 of DateTime/Locale/Base.pm # once (14µs+11µs) by DateTime::Locale::Base::BEGIN@119 at line 119 of DateTime/Locale/Base.pm # once (14µs+10µs) by Math::BigInt::BEGIN@879 at line 879 of Math/BigInt.pm # once (13µs+11µs) by bigint::BEGIN@25 at line 25 of bigint.pm # once (13µs+11µs) by DateTime::Locale::Base::BEGIN@25 at line 25 of DateTime/Locale/Base.pm # once (12µs+11µs) by Math::BigInt::BEGIN@207 at line 207 of Math/BigInt.pm # once (13µs+10µs) by Math::BigInt::BEGIN@656 at line 656 of Math/BigInt.pm # once (12µs+11µs) by FakeLocale::BEGIN@141 at line 141 of DateTime/Infinite.pm # once (12µs+11µs) by List::Util::BEGIN@32 at line 32 of List/Util.pm # once (12µs+10µs) by constant::BEGIN@29 at line 29 of constant.pm # once (13µs+10µs) by Math::BigInt::BEGIN@447 at line 447 of Math/BigInt.pm # once (13µs+10µs) by AutoLoader::BEGIN@186 at line 186 of AutoLoader.pm # once (13µs+10µs) by Math::BigInt::BEGIN@548 at line 548 of Math/BigInt.pm # once (12µs+10µs) by Math::BigInt::BEGIN@225 at line 225 of Math/BigInt.pm # once (12µs+10µs) by Math::BigInt::BEGIN@690 at line 690 of Math/BigInt.pm # once (12µs+10µs) by Exporter::Heavy::BEGIN@4 at line 4 of Exporter/Heavy.pm # once (12µs+10µs) by constant::BEGIN@52 at line 52 of constant.pm # once (12µs+10µs) by Math::BigInt::BEGIN@377 at line 377 of Math/BigInt.pm # once (11µs+10µs) by DateTime::Infinite::BEGIN@15 at line 15 of DateTime/Infinite.pm # once (12µs+9µs) by Carp::BEGIN@575 at line 575 of Carp.pm # once (12µs+9µs) by Math::BigInt::BEGIN@336 at line 336 of Math/BigInt.pm # once (12µs+9µs) by Math::BigInt::BEGIN@278 at line 278 of Math/BigInt.pm # once (12µs+9µs) by Class::Singleton::BEGIN@73 at line 73 of Class/Singleton.pm # once (11µs+9µs) by Math::BigInt::BEGIN@239 at line 239 of Math/BigInt.pm # once (11µs+9µs) by Math::BigInt::BEGIN@470 at line 470 of Math/BigInt.pm # once (11µs+9µs) by Math::BigInt::BEGIN@253 at line 253 of Math/BigInt.pm # once (11µs+9µs) by bigint::BEGIN@33 at line 33 of bigint.pm # once (6µs+8µs) by Moose::Object::BEGIN@85 at line 85 of Moose/Object.pm # once (6µs+7µs) by Class::MOP::Package::BEGIN@164 at line 164 of Class/MOP/Package.pm # once (7µs+6µs) by IO::Handle::BEGIN@366 at line 366 of IO/Handle.pm # once (6µs+5µs) by B::BEGIN@254 at line 254 of B.pm # once (6µs+5µs) by Mentat::Storage::Mongo::BEGIN@655 at line 655 of Mentat/Storage/Mongo.pm # once (6µs+5µs) by JSON::BEGIN@318 at line 318 of JSON.pm # once (6µs+5µs) by Moose::Exporter::BEGIN@321 at line 321 of Moose/Exporter.pm # once (6µs+5µs) by Moose::Exporter::BEGIN@132 at line 132 of Moose/Exporter.pm # once (6µs+5µs) by Sys::Syslog::BEGIN@517 at line 517 of Sys/Syslog.pm # once (6µs+5µs) by Moose::Util::TypeConstraints::BEGIN@68 at line 68 of Moose/Util/TypeConstraints.pm # once (6µs+4µs) by Moose::Exporter::BEGIN@716 at line 716 of Moose/Exporter.pm # once (6µs+5µs) by Sys::Syslog::BEGIN@153 at line 153 of Sys/Syslog.pm # once (6µs+5µs) by Socket::BEGIN@895 at line 895 of Socket.pm # once (6µs+5µs) by Class::MOP::Class::Immutable::Trait::BEGIN@36 at line 36 of Class/MOP/Class/Immutable/Trait.pm # once (6µs+5µs) by MRO::Compat::BEGIN@258 at line 258 of MRO/Compat.pm # once (6µs+4µs) by JSON::Backend::XS::Supportable::BEGIN@99 at line 99 of (eval 52)[JSON.pm:268] # once (5µs+5µs) by Sub::Exporter::Progressive::BEGIN@18 at line 18 of Sub/Exporter/Progressive.pm # once (6µs+4µs) by JSON::Backend::PP::BEGIN@383 at line 383 of JSON.pm # once (5µs+5µs) by JSON::Backend::XS::BEGIN@29 at line 29 of (eval 52)[JSON.pm:268] # once (5µs+4µs) by MRO::Compat::BEGIN@227 at line 227 of MRO/Compat.pm # once (5µs+5µs) by Readonly::XS::BEGIN@45 at line 45 of Readonly/XS.pm # once (5µs+4µs) by MRO::Compat::BEGIN@118 at line 118 of MRO/Compat.pm # once (5µs+4µs) by Sys::Syslog::BEGIN@546 at line 546 of Sys/Syslog.pm # once (5µs+4µs) by Sys::Syslog::BEGIN@13 at line 13 of Sys/Syslog.pm # once (5µs+4µs) by Sys::Syslog::BEGIN@159 at line 159 of Sys/Syslog.pm # once (5µs+4µs) by JSON::Backend::XS::BEGIN@42 at line 42 of (eval 52)[JSON.pm:268] # once (5µs+4µs) by Class::MOP::Class::Immutable::Trait::BEGIN@46 at line 46 of Class/MOP/Class/Immutable/Trait.pm # once (5µs+4µs) by Moose::Exporter::BEGIN@726 at line 726 of Moose/Exporter.pm
sub unimport {
407323µs shift;
4173732µs73628µs $^H &= ~ (@_ ? bits(@_) : $default_bits);
# spent 628µs making 73 calls to strict::bits, avg 9µs/call
42}
43
44122µs1;
45__END__
 
# spent 10µs within strict::CORE:match which was called: # once (10µs+0s) by main::BEGIN@3 at line 6
sub strict::CORE:match; # opcode
# spent 34µs within strict::CORE:regcomp which was called: # once (34µs+0s) by main::BEGIN@3 at line 6
sub strict::CORE:regcomp; # opcode