Profile of IO/Compress/Gzip/Constants.pm

Filename	/Users/ether/perl5/perlbrew/perls/36.0/lib/5.36.0/IO/Compress/Gzip/Constants.pm
Statements	Executed 69 statements in 1.62ms

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	28µs	31µs	IO::Compress::Gzip::Constants::BEGIN@3
1	1	1	9µs	44µs	IO::Compress::Gzip::Constants::BEGIN@92
1	1	1	8µs	58µs	IO::Compress::Gzip::Constants::BEGIN@70
1	1	1	8µs	29µs	IO::Compress::Gzip::Constants::BEGIN@76
1	1	1	8µs	48µs	IO::Compress::Gzip::Constants::BEGIN@87
1	1	1	7µs	71µs	IO::Compress::Gzip::Constants::BEGIN@69
1	1	1	7µs	43µs	IO::Compress::Gzip::Constants::BEGIN@73
1	1	1	6µs	32µs	IO::Compress::Gzip::Constants::BEGIN@109
1	1	1	6µs	27µs	IO::Compress::Gzip::Constants::BEGIN@111
1	1	1	6µs	26µs	IO::Compress::Gzip::Constants::BEGIN@113
1	1	1	6µs	25µs	IO::Compress::Gzip::Constants::BEGIN@115
1	1	1	6µs	36µs	IO::Compress::Gzip::Constants::BEGIN@143
1	1	1	6µs	8µs	IO::Compress::Gzip::Constants::BEGIN@5
1	1	1	6µs	49µs	IO::Compress::Gzip::Constants::BEGIN@65
1	1	1	6µs	31µs	IO::Compress::Gzip::Constants::BEGIN@66
1	1	1	6µs	34µs	IO::Compress::Gzip::Constants::BEGIN@88
1	1	1	5µs	22µs	IO::Compress::Gzip::Constants::BEGIN@114
1	1	1	5µs	37µs	IO::Compress::Gzip::Constants::BEGIN@4
1	1	1	5µs	26µs	IO::Compress::Gzip::Constants::BEGIN@74
1	1	1	5µs	23µs	IO::Compress::Gzip::Constants::BEGIN@75
1	1	1	5µs	21µs	IO::Compress::Gzip::Constants::BEGIN@77
1	1	1	5µs	21µs	IO::Compress::Gzip::Constants::BEGIN@78
1	1	1	5µs	25µs	IO::Compress::Gzip::Constants::BEGIN@80
1	1	1	5µs	27µs	IO::Compress::Gzip::Constants::BEGIN@82
1	1	1	5µs	22µs	IO::Compress::Gzip::Constants::BEGIN@84
1	1	1	5µs	30µs	IO::Compress::Gzip::Constants::BEGIN@86
1	1	1	5µs	31µs	IO::Compress::Gzip::Constants::BEGIN@89
1	1	1	4µs	27µs	IO::Compress::Gzip::Constants::BEGIN@119
1	1	1	4µs	20µs	IO::Compress::Gzip::Constants::BEGIN@67
1	1	1	4µs	27µs	IO::Compress::Gzip::Constants::BEGIN@90

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

Line	State ments	Time on line	Calls	Time in subs	Code
1					package IO::Compress::Gzip::Constants;
2
3	2	24µs	2	34µs	# spent 31µs (28+3) within IO::Compress::Gzip::Constants::BEGIN@3 which was called: # once (28µs+3µs) by IO::Compress::Gzip::BEGIN@15 at line 3 use strict ; # spent 31µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@3 # spent 3µs making 1 call to strict::import
4	2	13µs	2	69µs	# spent 37µs (5+32) within IO::Compress::Gzip::Constants::BEGIN@4 which was called: # once (5µs+32µs) by IO::Compress::Gzip::BEGIN@15 at line 4 use warnings; # spent 37µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@4 # spent 32µs making 1 call to warnings::import
5	2	88µs	2	10µs	# spent 8µs (6+2) within IO::Compress::Gzip::Constants::BEGIN@5 which was called: # once (6µs+2µs) by IO::Compress::Gzip::BEGIN@15 at line 5 use bytes; # spent 8µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@5 # spent 2µs making 1 call to bytes::import
6
7	1	1µs			require Exporter;
8
9					our ($VERSION, @ISA, @EXPORT, %GZIP_OS_Names);
10					our ($GZIP_FNAME_INVALID_CHAR_RE, $GZIP_FCOMMENT_INVALID_CHAR_RE);
11
12	1	1µs			$VERSION = '2.106';
13
14	1	11µs			@ISA = qw(Exporter);
15
16	1	3µs			@EXPORT= qw(
17
18					GZIP_ID_SIZE
19					GZIP_ID1
20					GZIP_ID2
21
22					GZIP_FLG_DEFAULT
23					GZIP_FLG_FTEXT
24					GZIP_FLG_FHCRC
25					GZIP_FLG_FEXTRA
26					GZIP_FLG_FNAME
27					GZIP_FLG_FCOMMENT
28					GZIP_FLG_RESERVED
29
30					GZIP_CM_DEFLATED
31
32					GZIP_MIN_HEADER_SIZE
33					GZIP_TRAILER_SIZE
34
35					GZIP_MTIME_DEFAULT
36					GZIP_XFL_DEFAULT
37					GZIP_FEXTRA_HEADER_SIZE
38					GZIP_FEXTRA_MAX_SIZE
39					GZIP_FEXTRA_SUBFIELD_HEADER_SIZE
40					GZIP_FEXTRA_SUBFIELD_ID_SIZE
41					GZIP_FEXTRA_SUBFIELD_LEN_SIZE
42					GZIP_FEXTRA_SUBFIELD_MAX_SIZE
43
44					$GZIP_FNAME_INVALID_CHAR_RE
45					$GZIP_FCOMMENT_INVALID_CHAR_RE
46
47					GZIP_FHCRC_SIZE
48
49					GZIP_ISIZE_MAX
50					GZIP_ISIZE_MOD_VALUE
51
52
53					GZIP_NULL_BYTE
54
55					GZIP_OS_DEFAULT
56
57					%GZIP_OS_Names
58
59					GZIP_MINIMUM_HEADER
60
61					);
62
63					# Constant names derived from RFC 1952
64
65	2	31µs	2	92µs	# spent 49µs (6+43) within IO::Compress::Gzip::Constants::BEGIN@65 which was called: # once (6µs+43µs) by IO::Compress::Gzip::BEGIN@15 at line 65 use constant GZIP_ID_SIZE => 2 ; # spent 49µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@65 # spent 43µs making 1 call to constant::import
66	2	20µs	2	56µs	# spent 31µs (6+25) within IO::Compress::Gzip::Constants::BEGIN@66 which was called: # once (6µs+25µs) by IO::Compress::Gzip::BEGIN@15 at line 66 use constant GZIP_ID1 => 0x1F; # spent 31µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@66 # spent 25µs making 1 call to constant::import
67	2	17µs	2	36µs	# spent 20µs (4+16) within IO::Compress::Gzip::Constants::BEGIN@67 which was called: # once (4µs+16µs) by IO::Compress::Gzip::BEGIN@15 at line 67 use constant GZIP_ID2 => 0x8B; # spent 20µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@67 # spent 16µs making 1 call to constant::import
68
69	2	35µs	2	135µs	# spent 71µs (7+64) within IO::Compress::Gzip::Constants::BEGIN@69 which was called: # once (7µs+64µs) by IO::Compress::Gzip::BEGIN@15 at line 69 use constant GZIP_MIN_HEADER_SIZE => 10 ;# minimum gzip header size # spent 71µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@69 # spent 64µs making 1 call to constant::import
70	2	37µs	2	108µs	# spent 58µs (8+50) within IO::Compress::Gzip::Constants::BEGIN@70 which was called: # once (8µs+50µs) by IO::Compress::Gzip::BEGIN@15 at line 70 use constant GZIP_TRAILER_SIZE => 8 ; # spent 58µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@70 # spent 50µs making 1 call to constant::import
71
72
73	2	22µs	2	79µs	# spent 43µs (7+36) within IO::Compress::Gzip::Constants::BEGIN@73 which was called: # once (7µs+36µs) by IO::Compress::Gzip::BEGIN@15 at line 73 use constant GZIP_FLG_DEFAULT => 0x00 ; # spent 43µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@73 # spent 36µs making 1 call to constant::import
74	2	19µs	2	47µs	# spent 26µs (5+21) within IO::Compress::Gzip::Constants::BEGIN@74 which was called: # once (5µs+21µs) by IO::Compress::Gzip::BEGIN@15 at line 74 use constant GZIP_FLG_FTEXT => 0x01 ; # spent 26µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@74 # spent 21µs making 1 call to constant::import
75	2	23µs	2	41µs	# spent 23µs (5+18) within IO::Compress::Gzip::Constants::BEGIN@75 which was called: # once (5µs+18µs) by IO::Compress::Gzip::BEGIN@15 at line 75 use constant GZIP_FLG_FHCRC => 0x02 ; # called CONTINUATION in gzip # spent 23µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@75 # spent 18µs making 1 call to constant::import
76	2	21µs	2	50µs	# spent 29µs (8+21) within IO::Compress::Gzip::Constants::BEGIN@76 which was called: # once (8µs+21µs) by IO::Compress::Gzip::BEGIN@15 at line 76 use constant GZIP_FLG_FEXTRA => 0x04 ; # spent 29µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@76 # spent 21µs making 1 call to constant::import
77	2	18µs	2	37µs	# spent 21µs (5+16) within IO::Compress::Gzip::Constants::BEGIN@77 which was called: # once (5µs+16µs) by IO::Compress::Gzip::BEGIN@15 at line 77 use constant GZIP_FLG_FNAME => 0x08 ; # spent 21µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@77 # spent 16µs making 1 call to constant::import
78	2	26µs	2	37µs	# spent 21µs (5+16) within IO::Compress::Gzip::Constants::BEGIN@78 which was called: # once (5µs+16µs) by IO::Compress::Gzip::BEGIN@15 at line 78 use constant GZIP_FLG_FCOMMENT => 0x10 ; # spent 21µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@78 # spent 16µs making 1 call to constant::import
79					#use constant GZIP_FLG_ENCRYPTED => 0x20 ; # documented in gzip sources
80	2	26µs	2	45µs	# spent 25µs (5+20) within IO::Compress::Gzip::Constants::BEGIN@80 which was called: # once (5µs+20µs) by IO::Compress::Gzip::BEGIN@15 at line 80 use constant GZIP_FLG_RESERVED => (0x20 \| 0x40 \| 0x80) ; # spent 25µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@80 # spent 20µs making 1 call to constant::import
81
82	2	20µs	2	49µs	# spent 27µs (5+22) within IO::Compress::Gzip::Constants::BEGIN@82 which was called: # once (5µs+22µs) by IO::Compress::Gzip::BEGIN@15 at line 82 use constant GZIP_XFL_DEFAULT => 0x00 ; # spent 27µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@82 # spent 22µs making 1 call to constant::import
83
84	2	19µs	2	39µs	# spent 22µs (5+17) within IO::Compress::Gzip::Constants::BEGIN@84 which was called: # once (5µs+17µs) by IO::Compress::Gzip::BEGIN@15 at line 84 use constant GZIP_MTIME_DEFAULT => 0x00 ; # spent 22µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@84 # spent 17µs making 1 call to constant::import
85
86	2	93µs	2	55µs	# spent 30µs (5+25) within IO::Compress::Gzip::Constants::BEGIN@86 which was called: # once (5µs+25µs) by IO::Compress::Gzip::BEGIN@15 at line 86 use constant GZIP_FEXTRA_HEADER_SIZE => 2 ; # spent 30µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@86 # spent 25µs making 1 call to constant::import
87	2	31µs	2	88µs	# spent 48µs (8+40) within IO::Compress::Gzip::Constants::BEGIN@87 which was called: # once (8µs+40µs) by IO::Compress::Gzip::BEGIN@15 at line 87 use constant GZIP_FEXTRA_MAX_SIZE => 0xFFFF ; # spent 48µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@87 # spent 40µs making 1 call to constant::import
88	2	21µs	2	62µs	# spent 34µs (6+28) within IO::Compress::Gzip::Constants::BEGIN@88 which was called: # once (6µs+28µs) by IO::Compress::Gzip::BEGIN@15 at line 88 use constant GZIP_FEXTRA_SUBFIELD_ID_SIZE => 2 ; # spent 34µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@88 # spent 28µs making 1 call to constant::import
89	2	30µs	2	57µs	# spent 31µs (5+26) within IO::Compress::Gzip::Constants::BEGIN@89 which was called: # once (5µs+26µs) by IO::Compress::Gzip::BEGIN@15 at line 89 use constant GZIP_FEXTRA_SUBFIELD_LEN_SIZE => 2 ; # spent 31µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@89 # spent 26µs making 1 call to constant::import
90	1	0s			# spent 27µs (4+23) within IO::Compress::Gzip::Constants::BEGIN@90 which was called: # once (4µs+23µs) by IO::Compress::Gzip::BEGIN@15 at line 91 use constant GZIP_FEXTRA_SUBFIELD_HEADER_SIZE => GZIP_FEXTRA_SUBFIELD_ID_SIZE +
91	1	33µs	2	50µs	GZIP_FEXTRA_SUBFIELD_LEN_SIZE; # spent 27µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@90 # spent 23µs making 1 call to constant::import
92	1	0s			# spent 44µs (9+35) within IO::Compress::Gzip::Constants::BEGIN@92 which was called: # once (9µs+35µs) by IO::Compress::Gzip::BEGIN@15 at line 93 use constant GZIP_FEXTRA_SUBFIELD_MAX_SIZE => GZIP_FEXTRA_MAX_SIZE -
93	1	65µs	2	79µs	GZIP_FEXTRA_SUBFIELD_HEADER_SIZE ; # spent 44µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@92 # spent 35µs making 1 call to constant::import
94
95
96	1	1µs			if (ord('A') == 193)
97					{
98					# EBCDIC
99					$GZIP_FNAME_INVALID_CHAR_RE = '[\x00-\x3f\xff]';
100					$GZIP_FCOMMENT_INVALID_CHAR_RE = '[\x00-\x0a\x11-\x14\x16-\x3f\xff]';
101
102					}
103					else
104					{
105	1	1µs			$GZIP_FNAME_INVALID_CHAR_RE = '[\x00-\x1F\x7F-\x9F]';
106	1	0s			$GZIP_FCOMMENT_INVALID_CHAR_RE = '[\x00-\x09\x11-\x1F\x7F-\x9F]';
107					}
108
109	2	21µs	2	58µs	# spent 32µs (6+26) within IO::Compress::Gzip::Constants::BEGIN@109 which was called: # once (6µs+26µs) by IO::Compress::Gzip::BEGIN@15 at line 109 use constant GZIP_FHCRC_SIZE => 2 ; # aka CONTINUATION in gzip # spent 32µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@109 # spent 26µs making 1 call to constant::import
110
111	2	38µs	2	48µs	# spent 27µs (6+21) within IO::Compress::Gzip::Constants::BEGIN@111 which was called: # once (6µs+21µs) by IO::Compress::Gzip::BEGIN@15 at line 111 use constant GZIP_CM_DEFLATED => 8 ; # spent 27µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@111 # spent 21µs making 1 call to constant::import
112
113	2	21µs	2	46µs	# spent 26µs (6+20) within IO::Compress::Gzip::Constants::BEGIN@113 which was called: # once (6µs+20µs) by IO::Compress::Gzip::BEGIN@15 at line 113 use constant GZIP_NULL_BYTE => "\x00"; # spent 26µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@113 # spent 20µs making 1 call to constant::import
114	2	20µs	2	39µs	# spent 22µs (5+17) within IO::Compress::Gzip::Constants::BEGIN@114 which was called: # once (5µs+17µs) by IO::Compress::Gzip::BEGIN@15 at line 114 use constant GZIP_ISIZE_MAX => 0xFFFFFFFF ; # spent 22µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@114 # spent 17µs making 1 call to constant::import
115	2	21µs	2	44µs	# spent 25µs (6+19) within IO::Compress::Gzip::Constants::BEGIN@115 which was called: # once (6µs+19µs) by IO::Compress::Gzip::BEGIN@15 at line 115 use constant GZIP_ISIZE_MOD_VALUE => GZIP_ISIZE_MAX + 1 ; # spent 25µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@115 # spent 19µs making 1 call to constant::import
116
117					# OS Names sourced from http://www.gzip.org/format.txt
118
119	2	563µs	2	50µs	# spent 27µs (4+23) within IO::Compress::Gzip::Constants::BEGIN@119 which was called: # once (4µs+23µs) by IO::Compress::Gzip::BEGIN@15 at line 119 use constant GZIP_OS_DEFAULT=> 0xFF ; # spent 27µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@119 # spent 23µs making 1 call to constant::import
120	1	18µs			%GZIP_OS_Names = (
121					0 => 'MS-DOS',
122					1 => 'Amiga',
123					2 => 'VMS',
124					3 => 'Unix',
125					4 => 'VM/CMS',
126					5 => 'Atari TOS',
127					6 => 'HPFS (OS/2, NT)',
128					7 => 'Macintosh',
129					8 => 'Z-System',
130					9 => 'CP/M',
131					10 => 'TOPS-20',
132					11 => 'NTFS (NT)',
133					12 => 'SMS QDOS',
134					13 => 'Acorn RISCOS',
135					14 => 'VFAT file system (Win95, NT)',
136					15 => 'MVS',
137					16 => 'BeOS',
138					17 => 'Tandem/NSK',
139					18 => 'THEOS',
140					GZIP_OS_DEFAULT() => 'Unknown',
141					) ;
142
143	1	0s			# spent 36µs (6+30) within IO::Compress::Gzip::Constants::BEGIN@143 which was called: # once (6µs+30µs) by IO::Compress::Gzip::BEGIN@15 at line 145 use constant GZIP_MINIMUM_HEADER => pack("C4 V C C",
144					GZIP_ID1, GZIP_ID2, GZIP_CM_DEFLATED, GZIP_FLG_DEFAULT,
145	1	153µs	3	525µs	GZIP_MTIME_DEFAULT, GZIP_XFL_DEFAULT, GZIP_OS_DEFAULT) ; # spent 459µs making 1 call to main::CORE:pack # spent 36µs making 1 call to IO::Compress::Gzip::Constants::BEGIN@143 # spent 30µs making 1 call to constant::import
146
147
148	1	16µs			1;