Profile of Data/UUID.pm

Filename	/usr/local/lib/perl/5.18.2/Data/UUID.pm
Statements	Executed 12 statements in 274µs

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	157µs	157µs	Data::UUID::::createData::UUID::create (xsub)
1	1	1	89µs	89µs	Data::UUID::::newData::UUID::new (xsub)
1	1	1	66µs	66µs	Data::UUID::::bootstrapData::UUID::bootstrap (xsub)
1	1	1	16µs	67µs	Data::UUID::::BEGIN@5Data::UUID::BEGIN@5
1	1	1	16µs	39µs	Data::UUID::::BEGIN@3Data::UUID::BEGIN@3
1	1	1	7µs	7µs	Data::UUID::::to_stringData::UUID::to_string (xsub)

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					package Data::UUID;
2
3	2	46µs	2	62µs	# spent 39µs (16+23) within Data::UUID::BEGIN@3 which was called: # once (16µs+23µs) by Data::GUID::BEGIN@7 at line 3 use strict; # spent 39µs making 1 call to Data::UUID::BEGIN@3 # spent 23µs making 1 call to strict::import
4
5	2	118µs	2	118µs	# spent 67µs (16+51) within Data::UUID::BEGIN@5 which was called: # once (16µs+51µs) by Data::GUID::BEGIN@7 at line 5 use Carp; # spent 67µs making 1 call to Data::UUID::BEGIN@5 # spent 51µs making 1 call to Exporter::import
6
7	1	700ns			require Exporter;
8	1	400ns			require DynaLoader;
9	1	84µs			require Digest::MD5;
10
11	1	9µs			our @ISA = qw(Exporter DynaLoader);
12	1	1µs			our @EXPORT = qw(
13					NameSpace_DNS
14					NameSpace_OID
15					NameSpace_URL
16					NameSpace_X500
17					);
18	1	400ns			our $VERSION = '1.224';
19
20	1	8µs	1	265µs	bootstrap Data::UUID $VERSION; # spent 265µs making 1 call to DynaLoader::bootstrap
21
22	1	6µs			1;
23					__END__

					# spent 66µs within Data::UUID::bootstrap which was called: # once (66µs+0s) by DynaLoader::bootstrap at line 207 of DynaLoader.pm sub Data::UUID::bootstrap; # xsub
					# spent 157µs within Data::UUID::create which was called: # once (157µs+0s) by Data::GUID::new at line 52 of Data/GUID.pm sub Data::UUID::create; # xsub
					# spent 89µs within Data::UUID::new which was called: # once (89µs+0s) by Data::GUID::__ANON__[/usr/local/share/perl/5.18.2/Data/GUID.pm:47] at line 46 of Data/GUID.pm sub Data::UUID::new; # xsub
					# spent 7µs within Data::UUID::to_string which was called: # once (7µs+0s) by Data::GUID::__ANON__[/usr/local/share/perl/5.18.2/Data/GUID.pm:147] at line 146 of Data/GUID.pm sub Data::UUID::to_string; # xsub