← Index
NYTProf Performance Profile   « line view »
For t/bug-md-11.t
  Run on Fri Mar 8 13:27:24 2024
Reported on Fri Mar 8 13:30:23 2024

Filename/home/micha/.plenv/versions/5.38.2/lib/perl5/site_perl/5.38.2/Test2/EventFacet.pm
StatementsExecuted 11 statements in 209µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
111792µs1.26msTest2::EventFacet::::BEGIN@7Test2::EventFacet::BEGIN@7
1119µs10µsTest2::EventFacet::::BEGIN@2Test2::EventFacet::BEGIN@2
1117µs22µsTest2::EventFacet::::BEGIN@3Test2::EventFacet::BEGIN@3
1115µs23µsTest2::EventFacet::::BEGIN@8Test2::EventFacet::BEGIN@8
0000s0sTest2::EventFacet::::cloneTest2::EventFacet::clone
0000s0sTest2::EventFacet::::facet_keyTest2::EventFacet::facet_key
0000s0sTest2::EventFacet::::is_listTest2::EventFacet::is_list
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package Test2::EventFacet;
2217µs212µs
# spent 10µs (9+1) within Test2::EventFacet::BEGIN@2 which was called: # once (9µs+1µs) by Test2::EventFacet::Trace::BEGIN@7 at line 2
use strict;
# spent 10µs making 1 call to Test2::EventFacet::BEGIN@2 # spent 2µs making 1 call to strict::import
3228µs238µs
# spent 22µs (7+15) within Test2::EventFacet::BEGIN@3 which was called: # once (7µs+15µs) by Test2::EventFacet::Trace::BEGIN@7 at line 3
use warnings;
# spent 22µs making 1 call to Test2::EventFacet::BEGIN@3 # spent 16µs making 1 call to warnings::import
4
51200nsour $VERSION = '1.302198';
6
7288µs21.30ms
# spent 1.26ms (792µs+473µs) within Test2::EventFacet::BEGIN@7 which was called: # once (792µs+473µs) by Test2::EventFacet::Trace::BEGIN@7 at line 7
use Test2::Util::HashBase qw/-details/;
# spent 1.26ms making 1 call to Test2::EventFacet::BEGIN@7 # spent 40µs making 1 call to Test2::Util::HashBase::import
8273µs241µs
# spent 23µs (5+18) within Test2::EventFacet::BEGIN@8 which was called: # once (5µs+18µs) by Test2::EventFacet::Trace::BEGIN@7 at line 8
use Carp qw/croak/;
# spent 23µs making 1 call to Test2::EventFacet::BEGIN@8 # spent 18µs making 1 call to Exporter::import
9
101100nsmy $SUBLEN = length(__PACKAGE__ . '::');
11sub facet_key {
12 my $key = ref($_[0]) || $_[0];
13 substr($key, 0, $SUBLEN, '');
14 return lc($key);
15}
16
17sub is_list { 0 }
18
19sub clone {
20 my $self = shift;
21 my $type = ref($self);
22 return bless {%$self, @_}, $type;
23}
24
2512µs1;
26
27__END__