← 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:10 2016

Filename/Users/timbo/perl5/perlbrew/perls/perl-5.18.2/lib/5.18.2/vars.pm
StatementsExecuted 3780 statements in 14.3ms
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
17217214012.1ms13.9msvars::::importvars::import
2313311.81ms1.81msvars::::CORE:matchvars::CORE:match (opcode)
111173┬Ás246┬Ásvars::::BEGIN@7vars::BEGIN@7
11114┬Ás14┬Ásvars::::BEGIN@3vars::BEGIN@3
11110┬Ás20┬Ásvars::::BEGIN@8vars::BEGIN@8
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package vars;
2
3252┬Ás114┬Ás
# spent 14┬Ás within vars::BEGIN@3 which was called: # once (14┬Ás+0s) by Config::BEGIN@11 at line 3
use 5.006;
# spent 14┬Ás making 1 call to vars::BEGIN@3
4
51600nsour $VERSION = '1.03';
6
72187┬Ás2320┬Ás
# spent 246┬Ás (173+73) within vars::BEGIN@7 which was called: # once (173┬Ás+73┬Ás) by Config::BEGIN@11 at line 7
use warnings::register;
# spent 246┬Ás making 1 call to vars::BEGIN@7 # spent 73┬Ás making 1 call to warnings::register::import
82254┬Ás231┬Ás
# spent 20┬Ás (10+11) within vars::BEGIN@8 which was called: # once (10┬Ás+11┬Ás) by Config::BEGIN@11 at line 8
use strict qw(vars subs);
# spent 20┬Ás making 1 call to vars::BEGIN@8 # spent 10┬Ás making 1 call to strict::import
9
10
# spent 13.9ms (12.1+1.81) within vars::import which was called 172 times, avg 81┬Ás/call: # once (4.29ms+75┬Ás) by Perl::Tidy::Tokenizer::BEGIN@22601 at line 22641 of Perl/Tidy.pm # once (1.69ms+368┬Ás) by Perl::Tidy::Formatter::BEGIN@5980 at line 6196 of Perl/Tidy.pm # once (670┬Ás+158┬Ás) by Lingua::EN::Inflect::BEGIN@1 at line 1 of (eval 279)[Env.pm:84] # once (477┬Ás+95┬Ás) by Perl::Tidy::VerticalAligner::BEGIN@19616 at line 19677 of Perl/Tidy.pm # once (153┬Ás+40┬Ás) by Perl::Tidy::Tokenizer::BEGIN@22644 at line 22662 of Perl/Tidy.pm # once (74┬Ás+33┬Ás) by Pod::Simple::BEGIN@13 at line 18 of Pod/Simple.pm # once (86┬Ás+19┬Ás) by Text::Wrap::BEGIN@15 at line 15 of Text/Wrap.pm # once (83┬Ás+18┬Ás) by Getopt::Long::BEGIN@45 at line 45 of Getopt/Long.pm # once (82┬Ás+19┬Ás) by Perl::Tidy::HtmlWriter::BEGIN@4525 at line 4535 of Perl/Tidy.pm # once (72┬Ás+17┬Ás) by Pod::Escapes::BEGIN@23 at line 32 of Pod/Escapes.pm # once (65┬Ás+14┬Ás) by version::BEGIN@7 at line 7 of version.pm # once (63┬Ás+15┬Ás) by Pod::Select::BEGIN@13 at line 13 of Pod/Select.pm # once (59┬Ás+11┬Ás) by PPI::Lexer::BEGIN@63 at line 63 of PPI/Lexer.pm # once (54┬Ás+11┬Ás) by Getopt::Long::BEGIN@51 at line 51 of Getopt/Long.pm # once (54┬Ás+11┬Ás) by File::HomeDir::BEGIN@13 at line 13 of File/HomeDir.pm # once (52┬Ás+12┬Ás) by Perl::Tidy::BEGIN@64 at line 70 of Perl/Tidy.pm # once (51┬Ás+11┬Ás) by Getopt::Long::BEGIN@48 at line 49 of Getopt/Long.pm # once (50┬Ás+11┬Ás) by File::Spec::Functions::BEGIN@6 at line 6 of File/Spec/Functions.pm # once (49┬Ás+12┬Ás) by IO::String::BEGIN@10 at line 10 of IO/String.pm # once (49┬Ás+10┬Ás) by Pod::Parser::BEGIN@14 at line 14 of Pod/Parser.pm # once (46┬Ás+11┬Ás) by HTML::Entities::BEGIN@139 at line 139 of HTML/Entities.pm # once (45┬Ás+11┬Ás) by Clone::BEGIN@4 at line 4 of Clone.pm # once (43┬Ás+12┬Ás) by Cwd::BEGIN@172 at line 172 of Cwd.pm # once (44┬Ás+10┬Ás) by File::Path::BEGIN@20 at line 20 of File/Path.pm # once (44┬Ás+10┬Ás) by Class::Inspector::BEGIN@50 at line 50 of Class/Inspector.pm # once (43┬Ás+9┬Ás) by File::Which::BEGIN@8 at line 8 of File/Which.pm # once (43┬Ás+10┬Ás) by Readonly::BEGIN@8 at line 8 of Readonly.pm # once (42┬Ás+10┬Ás) by Pod::Text::BEGIN@29 at line 29 of Pod/Text.pm # once (42┬Ás+9┬Ás) by PPI::Token::_QuoteEngine::Full::BEGIN@10 at line 10 of PPI/Token/_QuoteEngine/Full.pm # once (42┬Ás+9┬Ás) by File::ShareDir::BEGIN@118 at line 118 of File/ShareDir.pm # once (39┬Ás+10┬Ás) by PPI::Token::HereDoc::BEGIN@90 at line 90 of PPI/Token/HereDoc.pm # once (34┬Ás+14┬Ás) by PPI::Token::BEGIN@28 at line 28 of PPI/Token.pm # once (39┬Ás+9┬Ás) by Lingua::EN::Inflect::BEGIN@4 at line 4 of Lingua/EN/Inflect.pm # once (39┬Ás+9┬Ás) by Params::Util::BEGIN@65 at line 65 of Params/Util.pm # once (38┬Ás+9┬Ás) by PPI::Token::Separator::BEGIN@38 at line 38 of PPI/Token/Separator.pm # once (40┬Ás+7┬Ás) by Getopt::Long::BEGIN@26 at line 26 of Getopt/Long.pm # once (40┬Ás+7┬Ás) by PPI::BEGIN@9 at line 9 of PPI.pm # once (38┬Ás+9┬Ás) by PPI::Token::Word::BEGIN@41 at line 41 of PPI/Token/Word.pm # once (38┬Ás+9┬Ás) by File::Temp::BEGIN@37 at line 37 of File/Temp.pm # once (38┬Ás+8┬Ás) by Getopt::Long::BEGIN@46 at line 46 of Getopt/Long.pm # once (37┬Ás+8┬Ás) by Text::Tabs::BEGIN@9 at line 9 of Text/Tabs.pm # once (36┬Ás+9┬Ás) by Module::Pluggable::BEGIN@4 at line 4 of Module/Pluggable.pm # once (37┬Ás+7┬Ás) by PPI::Token::Quote::Single::BEGIN@41 at line 41 of PPI/Token/Quote/Single.pm # once (34┬Ás+8┬Ás) by PPI::Token::Data::BEGIN@34 at line 34 of PPI/Token/Data.pm # once (34┬Ás+7┬Ás) by PPI::Token::Quote::BEGIN@51 at line 51 of PPI/Token/Quote.pm # once (34┬Ás+7┬Ás) by Pod::PlainText::BEGIN@26 at line 26 of Pod/PlainText.pm # once (34┬Ás+7┬Ás) by PPI::Node::BEGIN@58 at line 58 of PPI/Node.pm # once (33┬Ás+8┬Ás) by Pod::Usage::BEGIN@13 at line 13 of Pod/Usage.pm # once (33┬Ás+7┬Ás) by PPI::Statement::Compound::BEGIN@56 at line 56 of PPI/Statement/Compound.pm # once (33┬Ás+7┬Ás) by PPI::Token::Whitespace::BEGIN@113 at line 113 of PPI/Token/Whitespace.pm # once (33┬Ás+6┬Ás) by PPI::Token::Structure::BEGIN@42 at line 42 of PPI/Token/Structure.pm # once (32┬Ás+7┬Ás) by PPI::Document::BEGIN@79 at line 79 of PPI/Document.pm # once (32┬Ás+7┬Ás) by PPI::Token::Prototype::BEGIN@52 at line 52 of PPI/Token/Prototype.pm # once (32┬Ás+7┬Ás) by PPI::Token::Unknown::BEGIN@34 at line 34 of PPI/Token/Unknown.pm # once (31┬Ás+7┬Ás) by PPI::Token::End::BEGIN@46 at line 46 of PPI/Token/End.pm # once (32┬Ás+7┬Ás) by PPI::Structure::BEGIN@97 at line 97 of PPI/Structure.pm # once (31┬Ás+7┬Ás) by PPI::Token::Attribute::BEGIN@38 at line 38 of PPI/Token/Attribute.pm # once (31┬Ás+7┬Ás) by Digest::MD5::BEGIN@4 at line 4 of Digest/MD5.pm # once (31┬Ás+7┬Ás) by PPI::Token::Magic::BEGIN@48 at line 48 of PPI/Token/Magic.pm # once (31┬Ás+7┬Ás) by PPI::Element::BEGIN@32 at line 32 of PPI/Element.pm # once (32┬Ás+5┬Ás) by PPI::Structure::Given::BEGIN@39 at line 39 of PPI/Structure/Given.pm # once (31┬Ás+6┬Ás) by Tie::StdArray::BEGIN@86 at line 86 of Tie/Array.pm # once (30┬Ás+7┬Ás) by PPI::Statement::BEGIN@155 at line 155 of PPI/Statement.pm # once (30┬Ás+7┬Ás) by PPI::Util::BEGIN@10 at line 10 of PPI/Util.pm # once (29┬Ás+7┬Ás) by PPI::Token::Operator::BEGIN@45 at line 45 of PPI/Token/Operator.pm # once (29┬Ás+6┬Ás) by Config::BEGIN@11 at line 11 of Config.pm # once (30┬Ás+5┬Ás) by PPI::Token::QuoteLike::Command::BEGIN@35 at line 35 of PPI/Token/QuoteLike/Command.pm # once (29┬Ás+6┬Ás) by PPI::Token::Whitespace::BEGIN@48 at line 48 of PPI/Token/Whitespace.pm # once (28┬Ás+6┬Ás) by Readonly::BEGIN@27 at line 27 of Readonly.pm # once (25┬Ás+7┬Ás) by PPI::Statement::Include::Perl6::BEGIN@44 at line 44 of PPI/Statement/Include/Perl6.pm # once (26┬Ás+5┬Ás) by PPI::Token::Number::Binary::BEGIN@32 at line 32 of PPI/Token/Number/Binary.pm # once (26┬Ás+5┬Ás) by PPI::Structure::List::BEGIN@42 at line 42 of PPI/Structure/List.pm # once (26┬Ás+5┬Ás) by PPI::Structure::When::BEGIN@39 at line 39 of PPI/Structure/When.pm # once (26┬Ás+5┬Ás) by List::MoreUtils::PP::BEGIN@327 at line 327 of List/MoreUtils/PP.pm # once (26┬Ás+5┬Ás) by PPI::Structure::Unknown::BEGIN@45 at line 45 of PPI/Structure/Unknown.pm # once (26┬Ás+5┬Ás) by PPI::Structure::Block::BEGIN@48 at line 48 of PPI/Structure/Block.pm # once (24┬Ás+6┬Ás) by List::MoreUtils::XS::BEGIN@7 at line 7 of List/MoreUtils/XS.pm # once (25┬Ás+5┬Ás) by PPI::Lexer::BEGIN@1051 at line 1051 of PPI/Lexer.pm # once (24┬Ás+5┬Ás) by PPI::Token::Quote::Literal::BEGIN@35 at line 35 of PPI/Token/Quote/Literal.pm # once (24┬Ás+6┬Ás) by HTML::Parser::BEGIN@10 at line 10 of HTML/Parser.pm # once (24┬Ás+5┬Ás) by B::Keywords::BEGIN@10 at line 10 of B/Keywords.pm # once (24┬Ás+6┬Ás) by PPI::Token::Comment::BEGIN@64 at line 64 of PPI/Token/Comment.pm # once (24┬Ás+5┬Ás) by PPI::Token::_QuoteEngine::Simple::BEGIN@8 at line 8 of PPI/Token/_QuoteEngine/Simple.pm # once (24┬Ás+5┬Ás) by File::HomeDir::Darwin::BEGIN@9 at line 9 of File/HomeDir/Darwin.pm # once (24┬Ás+5┬Ás) by PPI::Document::File::BEGIN@25 at line 25 of PPI/Document/File.pm # once (24┬Ás+5┬Ás) by PPI::Exception::ParserTimeout::BEGIN@6 at line 6 of PPI/Exception/ParserTimeout.pm # once (23┬Ás+5┬Ás) by PPI::Token::Number::BEGIN@35 at line 35 of PPI/Token/Number.pm # once (24┬Ás+5┬Ás) by File::HomeDir::Darwin::Cocoa::BEGIN@9 at line 9 of File/HomeDir/Darwin/Cocoa.pm # once (23┬Ás+5┬Ás) by PPI::Statement::When::BEGIN@47 at line 47 of PPI/Statement/When.pm # once (23┬Ás+5┬Ás) by String::Format::BEGIN@22 at line 22 of String/Format.pm # once (23┬Ás+5┬Ás) by PPI::Token::Pod::BEGIN@33 at line 33 of PPI/Token/Pod.pm # once (23┬Ás+5┬Ás) by PPI::Token::DashedWord::BEGIN@32 at line 32 of PPI/Token/DashedWord.pm # once (23┬Ás+5┬Ás) by PPI::Exception::ParserRejection::BEGIN@6 at line 6 of PPI/Exception/ParserRejection.pm # once (23┬Ás+5┬Ás) by PPI::Token::Quote::Interpolate::BEGIN@35 at line 35 of PPI/Token/Quote/Interpolate.pm # once (23┬Ás+5┬Ás) by PPI::Token::Symbol::BEGIN@34 at line 34 of PPI/Token/Symbol.pm # once (24┬Ás+5┬Ás) by File::HomeDir::Unix::BEGIN@10 at line 10 of File/HomeDir/Unix.pm # once (22┬Ás+6┬Ás) by File::Spec::BEGIN@4 at line 4 of File/Spec.pm # once (23┬Ás+5┬Ás) by PPI::Token::Regexp::Substitute::BEGIN@39 at line 39 of PPI/Token/Regexp/Substitute.pm # once (23┬Ás+5┬Ás) by PPI::Structure::Condition::BEGIN@43 at line 43 of PPI/Structure/Condition.pm # once (23┬Ás+5┬Ás) by PPI::Token::QuoteLike::BEGIN@51 at line 51 of PPI/Token/QuoteLike.pm # once (23┬Ás+5┬Ás) by PPI::Token::ArrayIndex::BEGIN@32 at line 32 of PPI/Token/ArrayIndex.pm # once (23┬Ás+5┬Ás) by PPI::Token::Quote::Double::BEGIN@39 at line 39 of PPI/Token/Quote/Double.pm # once (23┬Ás+5┬Ás) by PPI::Token::Number::Version::BEGIN@36 at line 36 of PPI/Token/Number/Version.pm # once (23┬Ás+5┬Ás) by PPI::Token::Cast::BEGIN@37 at line 37 of PPI/Token/Cast.pm # once (23┬Ás+5┬Ás) by PPI::Statement::Scheduled::BEGIN@59 at line 59 of PPI/Statement/Scheduled.pm # once (23┬Ás+5┬Ás) by PPI::Statement::End::BEGIN@50 at line 50 of PPI/Statement/End.pm # once (23┬Ás+5┬Ás) by PPI::Token::Number::Octal::BEGIN@32 at line 32 of PPI/Token/Number/Octal.pm # once (23┬Ás+5┬Ás) by PPI::Statement::Null::BEGIN@46 at line 46 of PPI/Statement/Null.pm # once (22┬Ás+5┬Ás) by PPI::Token::Number::Float::BEGIN@34 at line 34 of PPI/Token/Number/Float.pm # once (22┬Ás+5┬Ás) by Devel::InnerPackage::BEGIN@5 at line 5 of Devel/InnerPackage.pm # once (22┬Ás+5┬Ás) by PPI::Token::QuoteLike::Words::BEGIN@32 at line 32 of PPI/Token/QuoteLike/Words.pm # once (22┬Ás+5┬Ás) by PPI::Structure::For::BEGIN@39 at line 39 of PPI/Structure/For.pm # once (23┬Ás+5┬Ás) by PPI::Token::QuoteLike::Regexp::BEGIN@36 at line 36 of PPI/Token/QuoteLike/Regexp.pm # once (22┬Ás+5┬Ás) by PPI::Structure::Subscript::BEGIN@44 at line 44 of PPI/Structure/Subscript.pm # once (22┬Ás+5┬Ás) by PPI::Structure::Constructor::BEGIN@38 at line 38 of PPI/Structure/Constructor.pm # once (22┬Ás+5┬Ás) by PPI::Statement::Data::BEGIN@46 at line 46 of PPI/Statement/Data.pm # once (23┬Ás+5┬Ás) by PPI::Token::Regexp::BEGIN@48 at line 48 of PPI/Token/Regexp.pm # once (22┬Ás+5┬Ás) by PPI::Statement::Include::BEGIN@51 at line 51 of PPI/Statement/Include.pm # once (22┬Ás+5┬Ás) by PPI::Token::Number::Hex::BEGIN@32 at line 32 of PPI/Token/Number/Hex.pm # once (22┬Ás+5┬Ás) by PPI::Normal::BEGIN@43 at line 43 of PPI/Normal.pm # once (22┬Ás+5┬Ás) by PPI::Token::Number::Exp::BEGIN@34 at line 34 of PPI/Token/Number/Exp.pm # once (22┬Ás+5┬Ás) by PPI::Document::Fragment::BEGIN@24 at line 24 of PPI/Document/Fragment.pm # once (22┬Ás+5┬Ás) by PPI::Statement::Variable::BEGIN@45 at line 45 of PPI/Statement/Variable.pm # once (22┬Ás+5┬Ás) by PPI::Token::QuoteLike::Readline::BEGIN@44 at line 44 of PPI/Token/QuoteLike/Readline.pm # once (22┬Ás+5┬Ás) by PPI::Statement::Sub::BEGIN@38 at line 38 of PPI/Statement/Sub.pm # once (22┬Ás+5┬Ás) by PPI::Token::BOM::BEGIN@45 at line 45 of PPI/Token/BOM.pm # once (22┬Ás+5┬Ás) by PPI::Token::Label::BEGIN@34 at line 34 of PPI/Token/Label.pm # once (22┬Ás+5┬Ás) by PPI::Token::QuoteLike::Backtick::BEGIN@35 at line 35 of PPI/Token/QuoteLike/Backtick.pm # once (22┬Ás+5┬Ás) by PPI::Token::Structure::BEGIN@34 at line 34 of PPI/Token/Structure.pm # once (22┬Ás+5┬Ás) by PPI::Statement::Package::BEGIN@70 at line 70 of PPI/Statement/Package.pm # once (22┬Ás+5┬Ás) by PPI::Token::Regexp::Transliterate::BEGIN@43 at line 43 of PPI/Token/Regexp/Transliterate.pm # once (22┬Ás+5┬Ás) by PPI::Statement::UnmatchedBrace::BEGIN@50 at line 50 of PPI/Statement/UnmatchedBrace.pm # once (22┬Ás+5┬Ás) by PPI::Statement::Given::BEGIN@39 at line 39 of PPI/Statement/Given.pm # once (22┬Ás+5┬Ás) by PPI::Token::Regexp::Match::BEGIN@49 at line 49 of PPI/Token/Regexp/Match.pm # once (22┬Ás+4┬Ás) by HTML::Entities::BEGIN@140 at line 140 of HTML/Entities.pm # once (22┬Ás+5┬Ás) by PPI::Statement::Break::BEGIN@43 at line 43 of PPI/Statement/Break.pm # once (22┬Ás+5┬Ás) by PPI::Statement::Expression::BEGIN@41 at line 41 of PPI/Statement/Expression.pm # once (21┬Ás+5┬Ás) by PPI::Statement::Unknown::BEGIN@38 at line 38 of PPI/Statement/Unknown.pm # once (19┬Ás+6┬Ás) by Pod::Simple::LinkSection::BEGIN@10 at line 10 of Pod/Simple/LinkSection.pm # once (22┬Ás+3┬Ás) by File::HomeDir::Driver::BEGIN@10 at line 10 of File/HomeDir/Driver.pm # once (21┬Ás+3┬Ás) by Getopt::Long::BEGIN@22 at line 22 of Getopt/Long.pm # once (17┬Ás+5┬Ás) by Getopt::Long::BEGIN@19 at line 19 of Getopt/Long.pm # once (18┬Ás+3┬Ás) by base::BEGIN@4 at line 4 of base.pm # once (18┬Ás+3┬Ás) by parent::BEGIN@3 at line 3 of parent.pm # once (17┬Ás+4┬Ás) by Config::BEGIN@7 at line 7 of Config_heavy.pl # once (17┬Ás+4┬Ás) by Class::Data::Inheritable::BEGIN@4 at line 4 of Class/Data/Inheritable.pm # once (14┬Ás+6┬Ás) by PPI::Document::Normalized::BEGIN@48 at line 48 of PPI/Document/Normalized.pm # once (16┬Ás+4┬Ás) by Pod::Simple::LinkSection::BEGIN@5 at line 5 of Pod/Simple/LinkSection.pm # once (16┬Ás+3┬Ás) by PPI::Lexer::BEGIN@360 at line 360 of PPI/Lexer.pm # once (15┬Ás+3┬Ás) by Pod::ParseTree::BEGIN@826 at line 826 of Pod/InputObjects.pm # once (14┬Ás+3┬Ás) by Module::Pluggable::Object::BEGIN@9 at line 9 of Module/Pluggable/Object.pm # once (14┬Ás+3┬Ás) by PPI::Token::_QuoteEngine::BEGIN@36 at line 36 of PPI/Token/_QuoteEngine.pm # once (14┬Ás+3┬Ás) by PPI::Normal::Standard::BEGIN@21 at line 21 of PPI/Normal/Standard.pm # once (14┬Ás+3┬Ás) by PPI::Exception::BEGIN@6 at line 6 of PPI/Exception.pm # once (14┬Ás+3┬Ás) by Pod::Simple::BlackBox::BEGIN@25 at line 25 of Pod/Simple/BlackBox.pm # once (14┬Ás+3┬Ás) by PPI::Lexer::BEGIN@96 at line 96 of PPI/Lexer.pm # once (14┬Ás+3┬Ás) by PPI::Tokenizer::BEGIN@90 at line 90 of PPI/Tokenizer.pm # once (14┬Ás+3┬Ás) by File::Spec::Unix::BEGIN@4 at line 4 of File/Spec/Unix.pm # once (14┬Ás+3┬Ás) by Readonly::BEGIN@24 at line 24 of Readonly.pm # once (13┬Ás+3┬Ás) by Digest::base::BEGIN@4 at line 4 of Digest/base.pm # once (14┬Ás+3┬Ás) by Pod::InputObjects::BEGIN@14 at line 14 of Pod/InputObjects.pm # once (13┬Ás+2┬Ás) by B::Keywords::BEGIN@90 at line 90 of B/Keywords.pm # once (13┬Ás+2┬Ás) by B::Keywords::BEGIN@16 at line 16 of B/Keywords.pm # once (13┬Ás+3┬Ás) by B::Keywords::BEGIN@403 at line 403 of B/Keywords.pm # once (13┬Ás+2┬Ás) by B::Keywords::BEGIN@348 at line 348 of B/Keywords.pm # once (13┬Ás+2┬Ás) by B::Keywords::BEGIN@100 at line 100 of B/Keywords.pm # once (13┬Ás+2┬Ás) by B::Keywords::BEGIN@112 at line 112 of B/Keywords.pm # once (12┬Ás+2┬Ás) by B::Keywords::BEGIN@123 at line 123 of B/Keywords.pm # once (12┬Ás+2┬Ás) by B::Keywords::BEGIN@19 at line 19 of B/Keywords.pm # once (12┬Ás+2┬Ás) by B::Keywords::BEGIN@426 at line 426 of B/Keywords.pm # once (12┬Ás+2┬Ás) by B::Keywords::BEGIN@412 at line 412 of B/Keywords.pm # once (12┬Ás+2┬Ás) by B::Keywords::BEGIN@417 at line 417 of B/Keywords.pm
sub import {
11172106┬Ás my $callpack = caller;
12172267┬Ás my (undef, @imports) = @_;
1317221┬Ás my ($sym, $ch);
14172778┬Ás foreach (@imports) {
157713.83ms7711.29ms if (($ch, $sym) = /^([\$\@\%\*\&])(.+)/) {
# spent 1.29ms making 771 calls to vars::CORE:match, avg 2┬Ás/call
167715.31ms771306┬Ás if ($sym =~ /\W/) {
# spent 306┬Ás making 771 calls to vars::CORE:match, avg 398ns/call
17 # time for a more-detailed check-up
18 if ($sym =~ /^\w+[[{].*[]}]$/) {
19 require Carp;
20 Carp::croak("Can't declare individual elements of hash or array");
21 } elsif (warnings::enabled() and length($sym) == 1 and $sym !~ tr/a-zA-Z//) {
22 warnings::warn("No need to declare built-in vars");
23 } elsif (($^H &= strict::bits('vars'))) {
24 require Carp;
25 Carp::croak("'$_' is not a valid variable name under strict vars");
26 }
27 }
287711.51ms771208┬Ás $sym = "${callpack}::$sym" unless $sym =~ /::/;
# spent 208┬Ás making 771 calls to vars::CORE:match, avg 270ns/call
29 *$sym =
30 ( $ch eq "\$" ? \$$sym
31 : $ch eq "\@" ? \@$sym
32 : $ch eq "\%" ? \%$sym
33 : $ch eq "\*" ? \*$sym
34 : $ch eq "\&" ? \&$sym
357712.01ms : do {
36 require Carp;
37 Carp::croak("'$_' is not a valid variable name");
38 });
39 } else {
40 require Carp;
41 Carp::croak("'$_' is not a valid variable name");
42 }
43 }
44};
45
4612┬Ás1;
47__END__
 
# spent 1.81ms within vars::CORE:match which was called 2313 times, avg 781ns/call: # 771 times (1.29ms+0s) by vars::import at line 15, avg 2┬Ás/call # 771 times (306┬Ás+0s) by vars::import at line 16, avg 398ns/call # 771 times (208┬Ás+0s) by vars::import at line 28, avg 270ns/call
sub vars::CORE:match; # opcode