← Index
NYTProf Performance Profile   « block view • line view • sub view »
For C:/lo/libo-master/solenv/bin/make_installer.pl
  Run on Mon Sep 24 00:52:54 2012
Reported on Mon Sep 24 07:34:34 2012

Filename/usr/lib/perl5/5.14/strict.pm
StatementsExecuted 354 statements in 1.83ms
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
535351490µs520µsstrict::::importstrict::import
2731352µs352µsstrict::::bitsstrict::bits
242415301µs590µsstrict::::unimportstrict::unimport
11185µs85µsstrict::::CORE:regcompstrict::CORE:regcomp (opcode)
11125µs25µ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
312µs$strict::VERSION = "1.04";
4
5# Verify that we're called correctly so that strictures will work.
61161µs2110µsunless ( __FILE__ =~ /(^|[\/\\])\Q${\__PACKAGE__}\E\.pmc?$/ ) {
# spent 85µs making 1 call to strict::CORE:regcomp # spent 25µ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
1216µsmy %bitmask = (
13refs => 0x00000002,
14subs => 0x00000200,
15vars => 0x00000400
16);
17
18
# spent 352µs within strict::bits which was called 27 times, avg 13µs/call: # 24 times (289µs+0s) by strict::unimport at line 41, avg 12µs/call # 2 times (30µs+0s) by strict::import at line 36, avg 15µs/call # once (32µs+0s) by main::BEGIN@28 at line 32
sub bits {
19135322µs my $bits = 0;
20 my @wrong;
21 foreach my $s (@_) {
2260132µs push @wrong, $s unless exists $bitmask{$s};
23 $bits |= $bitmask{$s} || 0;
24 }
25 if (@wrong) {
26 require Carp;
27 Carp::croak("Unknown 'strict' tag(s) '@wrong'");
28 }
29 $bits;
30}
31
32111µs132µsmy $default_bits = bits(qw(refs subs vars));
# spent 32µs making 1 call to strict::bits
33
34
# spent 520µs (490+30) within strict::import which was called 53 times, avg 10µs/call: # once (19µs+16µs) by base::BEGIN@3 at line 3 of base.pm # once (13µs+14µs) by vars::BEGIN@8 at line 8 of vars.pm # once (27µs+0s) by Config::BEGIN@9 at line 9 of Config.pm # once (18µs+0s) by installer::logger::BEGIN@30 at line 30 of /cygdrive/c/lo/libo-master/instsetoo_native/util/C:/lo/libo-master/solenv/bin/modules/installer/logger.pm # once (16µs+0s) by installer::copyproject::BEGIN@30 at line 30 of /cygdrive/c/lo/libo-master/instsetoo_native/util/C:/lo/libo-master/solenv/bin/modules/installer/copyproject.pm # once (15µs+0s) by Carp::BEGIN@3 at line 3 of Carp.pm # once (15µs+0s) by Archive::Zip::ZipFileMember::BEGIN@3 at line 3 of Archive/Zip/ZipFileMember.pm # once (15µs+0s) by main::BEGIN@28 at line 28 of /cygdrive/c/lo/libo-master/instsetoo_native/util/C:/lo/libo-master/solenv/bin/make_installer.pl # once (14µs+0s) by List::Util::BEGIN@11 at line 11 of List/Util.pm # once (13µs+0s) by Fcntl::BEGIN@58 at line 58 of Fcntl.pm # once (12µs+0s) by File::Spec::Unix::BEGIN@3 at line 3 of File/Spec/Unix.pm # once (12µs+0s) by Archive::Zip::NewFileMember::BEGIN@3 at line 3 of Archive/Zip/NewFileMember.pm # once (11µs+0s) by installer::helppack::BEGIN@30 at line 30 of /cygdrive/c/lo/libo-master/instsetoo_native/util/C:/lo/libo-master/solenv/bin/modules/installer/helppack.pm # once (11µs+0s) by IO::File::BEGIN@128 at line 128 of IO/File.pm # once (10µs+0s) by Archive::Zip::Member::BEGIN@5 at line 5 of Archive/Zip/Member.pm # once (10µs+0s) by Digest::MD5::BEGIN@3 at line 3 of Digest/MD5.pm # once (10µs+0s) by IO::Handle::BEGIN@261 at line 261 of IO/Handle.pm # once (10µs+0s) by Archive::Zip::Archive::BEGIN@5 at line 5 of Archive/Zip/Archive.pm # once (10µs+0s) by Archive::Zip::DirectoryMember::BEGIN@3 at line 3 of Archive/Zip/DirectoryMember.pm # once (10µs+0s) by Cwd::BEGIN@170 at line 170 of Cwd.pm # once (10µs+0s) by File::stat::BEGIN@4 at line 4 of File/stat.pm # once (9µs+0s) by installer::exiter::BEGIN@30 at line 30 of /cygdrive/c/lo/libo-master/instsetoo_native/util/C:/lo/libo-master/solenv/bin/modules/installer/exiter.pm # once (9µs+0s) by POSIX::BEGIN@2 at line 2 of POSIX.pm # once (9µs+0s) by AutoLoader::BEGIN@3 at line 3 of AutoLoader.pm # once (9µs+0s) by installer::strip::BEGIN@30 at line 30 of /cygdrive/c/lo/libo-master/instsetoo_native/util/C:/lo/libo-master/solenv/bin/modules/installer/strip.pm # once (9µs+0s) by Archive::Zip::BEGIN@3 at line 3 of Archive/Zip.pm # once (9µs+0s) by Archive::Zip::StringMember::BEGIN@3 at line 3 of Archive/Zip/StringMember.pm # once (8µs+0s) by Scalar::Util::BEGIN@9 at line 9 of Scalar/Util.pm # once (8µs+0s) by File::Temp::BEGIN@142 at line 142 of File/Temp.pm # once (8µs+0s) by installer::converter::BEGIN@30 at line 30 of /cygdrive/c/lo/libo-master/instsetoo_native/util/C:/lo/libo-master/solenv/bin/modules/installer/converter.pm # once (8µs+0s) by FileHandle::BEGIN@4 at line 4 of FileHandle.pm # once (8µs+0s) by IO::Seekable::BEGIN@99 at line 99 of IO/Seekable.pm # once (7µs+0s) by installer::files::BEGIN@30 at line 30 of /cygdrive/c/lo/libo-master/instsetoo_native/util/C:/lo/libo-master/solenv/bin/modules/installer/files.pm # once (7µs+0s) by installer::download::BEGIN@30 at line 30 of /cygdrive/c/lo/libo-master/instsetoo_native/util/C:/lo/libo-master/solenv/bin/modules/installer/download.pm # once (7µs+0s) by File::Copy::BEGIN@11 at line 11 of File/Copy.pm # once (7µs+0s) by Archive::Zip::FileMember::BEGIN@3 at line 3 of Archive/Zip/FileMember.pm # once (6µs+0s) by File::Spec::Functions::BEGIN@4 at line 4 of File/Spec/Functions.pm # once (6µs+0s) by Exporter::Heavy::BEGIN@3 at line 3 of Exporter/Heavy.pm # once (6µs+0s) by File::Spec::BEGIN@3 at line 3 of File/Spec.pm # once (6µs+0s) by File::Basename::BEGIN@50 at line 50 of File/Basename.pm # once (6µs+0s) by IO::BEGIN@7 at line 7 of IO.pm # once (6µs+0s) by File::Find::BEGIN@3 at line 3 of File/Find.pm # once (6µs+0s) by File::Spec::Cygwin::BEGIN@3 at line 3 of File/Spec/Cygwin.pm # once (5µs+0s) by Class::Struct::BEGIN@7 at line 7 of Class/Struct.pm # once (5µs+0s) by Time::Local::BEGIN@6 at line 6 of Time/Local.pm # once (5µs+0s) by Digest::base::BEGIN@3 at line 3 of Digest/base.pm # once (5µs+0s) by lib::BEGIN@8 at line 8 of lib.pm # once (5µs+0s) by constant::BEGIN@3 at line 3 of constant.pm # once (5µs+0s) by Errno::BEGIN@9 at line 9 of Errno.pm # once (5µs+0s) by File::Path::BEGIN@4 at line 4 of File/Path.pm # once (4µs+0s) by File::Find::BEGIN@349 at line 349 of File/Find.pm # once (4µs+0s) by File::Temp::Dir::BEGIN@2406 at line 2406 of File/Temp.pm # once (4µs+0s) by Compress::Raw::Zlib::BEGIN@11 at line 11 of Compress/Raw/Zlib.pm
sub import {
35106867µs shift;
36230µs $^H |= @_ ? bits(@_) : $default_bits;
# spent 30µs making 2 calls to strict::bits, avg 15µs/call
37}
38
39
# spent 590µs (301+289) within strict::unimport which was called 24 times, avg 25µs/call: # once (37µs+28µs) by Cwd::BEGIN@818 at line 818 of Cwd.pm # once (29µs+22µs) by Carp::BEGIN@341 at line 341 of Carp.pm # once (16µs+21µs) by Carp::BEGIN@46 at line 46 of Carp.pm # once (13µs+17µs) by File::Spec::Unix::BEGIN@149 at line 149 of File/Spec/Unix.pm # once (14µs+15µs) by IO::Handle::BEGIN@624 at line 624 of IO/Handle.pm # once (12µs+15µs) by FileHandle::BEGIN@46 at line 46 of FileHandle.pm # once (12µs+13µs) by AutoLoader::BEGIN@30 at line 30 of AutoLoader.pm # once (13µs+11µs) by File::Path::BEGIN@329 at line 329 of File/Path.pm # once (11µs+12µs) by File::stat::BEGIN@35 at line 35 of File/stat.pm # once (13µs+10µs) by Config::BEGIN@45 at line 45 of Config.pm # once (11µs+11µs) by Exporter::Heavy::BEGIN@4 at line 4 of Exporter/Heavy.pm # once (11µs+10µs) by File::stat::BEGIN@200 at line 200 of File/stat.pm # once (10µs+9µs) by File::Spec::Functions::BEGIN@42 at line 42 of File/Spec/Functions.pm # once (10µs+9µs) by constant::BEGIN@29 at line 29 of constant.pm # once (10µs+9µs) by File::Temp::BEGIN@241 at line 241 of File/Temp.pm # once (10µs+9µs) by Class::Struct::BEGIN@99 at line 99 of Class/Struct.pm # once (9µs+9µs) by AutoLoader::BEGIN@138 at line 138 of AutoLoader.pm # once (9µs+8µs) by Class::Struct::BEGIN@188 at line 188 of Class/Struct.pm # once (9µs+9µs) by AutoLoader::BEGIN@186 at line 186 of AutoLoader.pm # once (9µs+9µs) by constant::BEGIN@114 at line 114 of constant.pm # once (8µs+9µs) by File::Temp::BEGIN@271 at line 271 of File/Temp.pm # once (9µs+7µs) by constant::BEGIN@52 at line 52 of constant.pm # once (9µs+8µs) by Compress::Raw::Zlib::BEGIN@79 at line 79 of Compress/Raw/Zlib.pm # once (8µs+8µs) by Class::Struct::BEGIN@108 at line 108 of Class/Struct.pm
sub unimport {
4048286µs shift;
4124289µs $^H &= ~ (@_ ? bits(@_) : $default_bits);
# spent 289µs making 24 calls to strict::bits, avg 12µs/call
42}
43
44148µs1;
45__END__
 
# spent 25µs within strict::CORE:match which was called: # once (25µs+0s) by main::BEGIN@28 at line 6
sub strict::CORE:match; # opcode
# spent 85µs within strict::CORE:regcomp which was called: # once (85µs+0s) by main::BEGIN@28 at line 6
sub strict::CORE:regcomp; # opcode