← Index
NYTProf Performance Profile   « line view »
For split.pl
  Run on Thu Apr 20 02:05:47 2023
Reported on Thu Apr 20 18:31:09 2023

Filename/usr/lib/x86_64-linux-gnu/perl-base/parent.pm
StatementsExecuted 56 statements in 263µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
664449µs550µsparent::::importparent::import
71116µs16µsparent::::CORE:substparent::CORE:subst (opcode)
1117µs9µsparent::::BEGIN@2parent::BEGIN@2
1114µs8µsparent::::BEGIN@21parent::BEGIN@21
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package parent;
2275µs210µs
# spent 9µs (7+2) within parent::BEGIN@2 which was called: # once (7µs+2µs) by File::Temp::BEGIN@167 at line 2
use strict;
# spent 9µs making 1 call to parent::BEGIN@2 # spent 2µs making 1 call to strict::import
3
41200nsour $VERSION = '0.238';
5
6
# spent 550µs (449+101) within parent::import which was called 6 times, avg 92µs/call: # once (401µs+89µs) by Encode::UTF_EBCDIC::BEGIN@178 at line 178 of Encode.pm # once (12µs+5µs) by File::Temp::BEGIN@167 at line 167 of File/Temp.pm # once (9µs+3µs) by Encode::XS::BEGIN@210 at line 210 of Encode.pm # once (10µs+1µs) by Gradescope::Translate::BEGIN@21 at line 21 of /home/hejohns/documentsNoSync/22f/490/gradescope-utils/lib/Gradescope/Translate.pm # once (9µs+2µs) by Encode::utf8::BEGIN@215 at line 215 of Encode.pm # once (8µs+900ns) by Gradescope::Color::BEGIN@20 at line 20 of /home/hejohns/documentsNoSync/22f/490/gradescope-utils/lib/Gradescope/Color.pm
sub import {
762µs my $class = shift;
8
963µs my $inheritor = caller(0);
10
1163µs if ( @_ and $_[0] eq '-norequire' ) {
12 shift @_;
13 } else {
1466µs for ( my @filename = @_ ) {
15728µs716µs s{::|'}{/}g;
# spent 16µs making 7 calls to parent::CORE:subst, avg 2µs/call
16761µs require "$_.pm"; # dies if the file is not found
17 }
18 }
19
20 {
21858µs212µs
# spent 8µs (4+4) within parent::BEGIN@21 which was called: # once (4µs+4µs) by File::Temp::BEGIN@167 at line 21
no strict 'refs';
# spent 8µs making 1 call to parent::BEGIN@21 # spent 4µs making 1 call to strict::unimport
22626µs push @{"$inheritor\::ISA"}, @_; # dies if a loop is detected
23 };
24};
25
2612µs1;
27
28__END__
 
# spent 16µs within parent::CORE:subst which was called 7 times, avg 2µs/call: # 7 times (16µs+0s) by parent::import at line 15, avg 2µs/call
sub parent::CORE:subst; # opcode