← Index
NYTProf Performance Profile   « line view »
For script/ponapi
  Run on Wed Feb 10 15:51:26 2016
Reported on Thu Feb 11 09:43:08 2016

Filename/usr/lib/perl/5.18/File/Spec.pm
StatementsExecuted 11 statements in 156µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
1118µs18µsFile::Spec::::BEGIN@3File::Spec::BEGIN@3
1116µs29µsFile::Spec::::BEGIN@4File::Spec::BEGIN@4
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package File::Spec;
2
3222µs228µs
# spent 18µs (8+10) within File::Spec::BEGIN@3 which was called: # once (8µs+10µs) by Module::Pluggable::Object::BEGIN@4 at line 3
use strict;
# spent 18µs making 1 call to File::Spec::BEGIN@3 # spent 10µs making 1 call to strict::import
4268µs252µs
# spent 29µs (6+23) within File::Spec::BEGIN@4 which was called: # once (6µs+23µs) by Module::Pluggable::Object::BEGIN@4 at line 4
use vars qw(@ISA $VERSION);
# spent 29µs making 1 call to File::Spec::BEGIN@4 # spent 23µs making 1 call to vars::import
5
61500ns$VERSION = '3.40';
71400ns$VERSION =~ tr/_//;
8
913µsmy %module = (MacOS => 'Mac',
10 MSWin32 => 'Win32',
11 os2 => 'OS2',
12 VMS => 'VMS',
13 epoc => 'Epoc',
14 NetWare => 'Win32', # Yes, File::Spec::Win32 works on NetWare.
15 symbian => 'Win32', # Yes, File::Spec::Win32 works on symbian.
16 dos => 'OS2', # Yes, File::Spec::OS2 works on DJGPP.
17 cygwin => 'Cygwin');
18
191800nsmy $module = $module{$^O} || 'Unix';
20
21150µsrequire "File/Spec/$module.pm";
2216µs@ISA = ("File::Spec::$module");
23
2416µs1;
25
26__END__