Filename | /Users/timbo/perl5/perlbrew/perls/perl-5.18.2/lib/site_perl/5.18.2/B/Keywords.pm |
Statements | Executed 43 statements in 832µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 13µs | 25µs | BEGIN@5 | B::Keywords::
1 | 1 | 1 | 8µs | 23µs | BEGIN@412 | B::Keywords::
1 | 1 | 1 | 7µs | 22µs | BEGIN@123 | B::Keywords::
1 | 1 | 1 | 6µs | 35µs | BEGIN@10 | B::Keywords::
1 | 1 | 1 | 6µs | 22µs | BEGIN@16 | B::Keywords::
1 | 1 | 1 | 6µs | 22µs | BEGIN@90 | B::Keywords::
1 | 1 | 1 | 6µs | 21µs | BEGIN@112 | B::Keywords::
1 | 1 | 1 | 6µs | 21µs | BEGIN@348 | B::Keywords::
1 | 1 | 1 | 6µs | 20µs | BEGIN@417 | B::Keywords::
1 | 1 | 1 | 6µs | 21µs | BEGIN@100 | B::Keywords::
1 | 1 | 1 | 6µs | 20µs | BEGIN@426 | B::Keywords::
1 | 1 | 1 | 6µs | 21µs | BEGIN@403 | B::Keywords::
1 | 1 | 1 | 6µs | 20µs | BEGIN@19 | B::Keywords::
1 | 1 | 1 | 3µs | 3µs | BEGIN@431 | B::Keywords::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | ## no critic (PodSections,UseWarnings,Interpolation,EndWithOne,NoisyQuotes) | ||||
2 | |||||
3 | package B::Keywords; | ||||
4 | |||||
5 | 2 | 32µs | 2 | 36µs | # spent 25µs (13+11) within B::Keywords::BEGIN@5 which was called:
# once (13µs+11µs) by Perl::Critic::Utils::BEGIN@22 at line 5 # spent 25µs making 1 call to B::Keywords::BEGIN@5
# spent 11µs making 1 call to strict::import |
6 | |||||
7 | 1 | 200ns | require Exporter; | ||
8 | 1 | 900ns | *import = *import = \&Exporter::import; | ||
9 | |||||
10 | 2 | 43µs | 2 | 64µs | # spent 35µs (6+29) within B::Keywords::BEGIN@10 which was called:
# once (6µs+29µs) by Perl::Critic::Utils::BEGIN@22 at line 10 # spent 35µs making 1 call to B::Keywords::BEGIN@10
# spent 29µs making 1 call to vars::import |
11 | 1 | 2µs | @EXPORT_OK = qw( @Scalars @Arrays @Hashes @Filehandles @Symbols | ||
12 | @Functions @Barewords @TieIOMethods @UNIVERSALMethods | ||||
13 | @ExporterSymbols ); | ||||
14 | 1 | 1µs | %EXPORT_TAGS = ( 'all' => \@EXPORT_OK ); | ||
15 | |||||
16 | 2 | 23µs | 2 | 38µs | # spent 22µs (6+16) within B::Keywords::BEGIN@16 which was called:
# once (6µs+16µs) by Perl::Critic::Utils::BEGIN@22 at line 16 # spent 22µs making 1 call to B::Keywords::BEGIN@16
# spent 16µs making 1 call to vars::import |
17 | 1 | 300ns | $VERSION = '1.13'; | ||
18 | |||||
19 | 2 | 95µs | 2 | 35µs | # spent 20µs (6+15) within B::Keywords::BEGIN@19 which was called:
# once (6µs+15µs) by Perl::Critic::Utils::BEGIN@22 at line 19 # spent 20µs making 1 call to B::Keywords::BEGIN@19
# spent 15µs making 1 call to vars::import |
20 | 1 | 19µs | @Scalars = ( | ||
21 | qw( $a | ||||
22 | $b | ||||
23 | $_ $ARG | ||||
24 | $& $MATCH | ||||
25 | $` $PREMATCH | ||||
26 | $' $POSTMATCH | ||||
27 | $+ $LAST_PAREN_MATCH | ||||
28 | $* $MULTILINE_MATCHING | ||||
29 | $. $INPUT_LINE_NUMBER $NR | ||||
30 | $/ $INPUT_RECORD_SEPARATOR $RS | ||||
31 | $| $OUTPUT_AUTO_FLUSH ), '$,', qw( $OUTPUT_FIELD_SEPARATOR $OFS | ||||
32 | $\ $OUTPUT_RECORD_SEPARATOR $ORS | ||||
33 | $" $LIST_SEPARATOR | ||||
34 | $; $SUBSCRIPT_SEPARATOR $SUBSEP | ||||
35 | ), '$#', qw( $OFMT | ||||
36 | $% $FORMAT_PAGE_NUMBER | ||||
37 | $= $FORMAT_LINES_PER_PAGE | ||||
38 | $- $FORMAT_LINES_LEFT | ||||
39 | $~ $FORMAT_NAME | ||||
40 | $^ $FORMAT_TOP_NAME | ||||
41 | $: $FORMAT_LINE_BREAK_CHARACTERS | ||||
42 | $? $CHILD_ERROR $^CHILD_ERROR_NATIVE | ||||
43 | $! $ERRNO $OS_ERROR | ||||
44 | $@ $EVAL_ERROR | ||||
45 | $$ $PROCESS_ID $PID | ||||
46 | $< $REAL_USER_ID $UID | ||||
47 | $> $EFFECTIVE_USER_ID $EUID ), '$(', qw( $REAL_GROUP_ID $GID ), '$)', | ||||
48 | qw( | ||||
49 | $EFFECTIVE_GROUP_ID $EGID | ||||
50 | $0 $PROGRAM_NAME | ||||
51 | $[ | ||||
52 | $] | ||||
53 | $^A $ACCUMULATOR | ||||
54 | $^C $COMPILING | ||||
55 | $^CHILD_ERROR_NATIVE | ||||
56 | $^D $DEBUGGING | ||||
57 | $^E $EXTENDED_OS_ERROR | ||||
58 | $^ENCODING | ||||
59 | $^F $SYSTEM_FD_MAX | ||||
60 | $^GLOBAL_PHASE | ||||
61 | $^H | ||||
62 | $^I $INPLACE_EDIT | ||||
63 | $^L $FORMAT_FORMFEED | ||||
64 | $^LAST_FH | ||||
65 | $^M | ||||
66 | $^MATCH | ||||
67 | $^N $LAST_SUBMATCH_RESULT | ||||
68 | $^O $OSNAME | ||||
69 | $^OPEN | ||||
70 | $^P $PERLDB | ||||
71 | $^PREMATCH $^POSTMATCH | ||||
72 | $^R $LAST_REGEXP_CODE_RESULT | ||||
73 | $^RE_DEBUG_FLAGS | ||||
74 | $^RE_TRIE_MAXBUF | ||||
75 | $^S $EXCEPTIONS_BEING_CAUGHT | ||||
76 | $^T $BASETIME | ||||
77 | $^TAINT | ||||
78 | $^UNICODE | ||||
79 | $^UTF8CACHE | ||||
80 | $^UTF8LOCALE | ||||
81 | $^V $PERL_VERSION | ||||
82 | $^W $WARNING $^WARNING_BITS | ||||
83 | $^WIDE_SYSTEM_CALLS | ||||
84 | $^WIN32_SLOPPY_STAT | ||||
85 | $^X $EXECUTABLE_NAME | ||||
86 | $ARGV | ||||
87 | ), | ||||
88 | ); | ||||
89 | |||||
90 | 2 | 28µs | 2 | 38µs | # spent 22µs (6+16) within B::Keywords::BEGIN@90 which was called:
# once (6µs+16µs) by Perl::Critic::Utils::BEGIN@22 at line 90 # spent 22µs making 1 call to B::Keywords::BEGIN@90
# spent 16µs making 1 call to vars::import |
91 | 1 | 1µs | @Arrays = qw( | ||
92 | @+ $LAST_MATCH_END | ||||
93 | @- @LAST_MATCH_START | ||||
94 | @ARGV | ||||
95 | @F | ||||
96 | @INC | ||||
97 | @_ @ARG | ||||
98 | ); | ||||
99 | |||||
100 | 2 | 42µs | 2 | 36µs | # spent 21µs (6+15) within B::Keywords::BEGIN@100 which was called:
# once (6µs+15µs) by Perl::Critic::Utils::BEGIN@22 at line 100 # spent 21µs making 1 call to B::Keywords::BEGIN@100
# spent 15µs making 1 call to vars::import |
101 | 1 | 2µs | @Hashes = qw( | ||
102 | %OVERLOAD | ||||
103 | %+ %LAST_MATCH_END | ||||
104 | %- %LAST_MATCH_START | ||||
105 | %! %OS_ERROR %ERRNO | ||||
106 | %^H | ||||
107 | %INC | ||||
108 | %ENV | ||||
109 | %SIG | ||||
110 | ); | ||||
111 | |||||
112 | 2 | 30µs | 2 | 36µs | # spent 21µs (6+15) within B::Keywords::BEGIN@112 which was called:
# once (6µs+15µs) by Perl::Critic::Utils::BEGIN@22 at line 112 # spent 21µs making 1 call to B::Keywords::BEGIN@112
# spent 15µs making 1 call to vars::import |
113 | 1 | 1µs | @Filehandles = qw( | ||
114 | *ARGV ARGV | ||||
115 | *_ _ | ||||
116 | ARGVOUT | ||||
117 | DATA | ||||
118 | STDIN | ||||
119 | STDOUT | ||||
120 | STDERR | ||||
121 | ); | ||||
122 | |||||
123 | 2 | 142µs | 2 | 37µs | # spent 22µs (7+15) within B::Keywords::BEGIN@123 which was called:
# once (7µs+15µs) by Perl::Critic::Utils::BEGIN@22 at line 123 # spent 22µs making 1 call to B::Keywords::BEGIN@123
# spent 15µs making 1 call to vars::import |
124 | 1 | 33µs | @Functions = qw( | ||
125 | __SUB__ | ||||
126 | AUTOLOAD | ||||
127 | BEGIN | ||||
128 | DESTROY | ||||
129 | END | ||||
130 | INIT | ||||
131 | CHECK | ||||
132 | UNITCHECK | ||||
133 | abs | ||||
134 | accept | ||||
135 | alarm | ||||
136 | atan2 | ||||
137 | bind | ||||
138 | binmode | ||||
139 | bless | ||||
140 | break | ||||
141 | caller | ||||
142 | chdir | ||||
143 | chmod | ||||
144 | chomp | ||||
145 | chop | ||||
146 | chown | ||||
147 | chr | ||||
148 | chroot | ||||
149 | close | ||||
150 | closedir | ||||
151 | connect | ||||
152 | cos | ||||
153 | crypt | ||||
154 | dbmclose | ||||
155 | dbmopen | ||||
156 | defined | ||||
157 | delete | ||||
158 | die | ||||
159 | dump | ||||
160 | each | ||||
161 | endgrent | ||||
162 | endhostent | ||||
163 | endnetent | ||||
164 | endprotoent | ||||
165 | endpwent | ||||
166 | endservent | ||||
167 | eof | ||||
168 | eval | ||||
169 | evalbytes | ||||
170 | exec | ||||
171 | exists | ||||
172 | exit | ||||
173 | exp | ||||
174 | fc | ||||
175 | fcntl | ||||
176 | fileno | ||||
177 | flock | ||||
178 | fork | ||||
179 | format | ||||
180 | formline | ||||
181 | getc | ||||
182 | getgrent | ||||
183 | getgrgid | ||||
184 | getgrnam | ||||
185 | gethostbyaddr | ||||
186 | gethostbyname | ||||
187 | gethostent | ||||
188 | getlogin | ||||
189 | getnetbyaddr | ||||
190 | getnetbyname | ||||
191 | getnetent | ||||
192 | getpeername | ||||
193 | getpgrp | ||||
194 | getppid | ||||
195 | getpriority | ||||
196 | getprotobyname | ||||
197 | getprotobynumber | ||||
198 | getprotoent | ||||
199 | getpwent | ||||
200 | getpwnam | ||||
201 | getpwuid | ||||
202 | getservbyname | ||||
203 | getservbyport | ||||
204 | getservent | ||||
205 | getsockname | ||||
206 | getsockopt | ||||
207 | glob | ||||
208 | gmtime | ||||
209 | goto | ||||
210 | grep | ||||
211 | hex | ||||
212 | index | ||||
213 | int | ||||
214 | import | ||||
215 | ioctl | ||||
216 | join | ||||
217 | keys | ||||
218 | kill | ||||
219 | last | ||||
220 | lc | ||||
221 | lcfirst | ||||
222 | length | ||||
223 | link | ||||
224 | listen | ||||
225 | local | ||||
226 | localtime | ||||
227 | log | ||||
228 | lstat | ||||
229 | map | ||||
230 | mkdir | ||||
231 | msgctl | ||||
232 | msgget | ||||
233 | msgrcv | ||||
234 | msgsnd | ||||
235 | my | ||||
236 | next | ||||
237 | not | ||||
238 | oct | ||||
239 | open | ||||
240 | opendir | ||||
241 | ord | ||||
242 | our | ||||
243 | pack | ||||
244 | pipe | ||||
245 | pop | ||||
246 | pos | ||||
247 | |||||
248 | printf | ||||
249 | prototype | ||||
250 | push | ||||
251 | quotemeta | ||||
252 | rand | ||||
253 | read | ||||
254 | readdir | ||||
255 | readline | ||||
256 | readlink | ||||
257 | readpipe | ||||
258 | recv | ||||
259 | redo | ||||
260 | ref | ||||
261 | rename | ||||
262 | require | ||||
263 | reset | ||||
264 | return | ||||
265 | reverse | ||||
266 | rewinddir | ||||
267 | rindex | ||||
268 | rmdir | ||||
269 | say | ||||
270 | scalar | ||||
271 | seek | ||||
272 | seekdir | ||||
273 | select | ||||
274 | semctl | ||||
275 | semget | ||||
276 | semop | ||||
277 | send | ||||
278 | setgrent | ||||
279 | sethostent | ||||
280 | setnetent | ||||
281 | setpgrp | ||||
282 | setpriority | ||||
283 | setprotoent | ||||
284 | setpwent | ||||
285 | setservent | ||||
286 | setsockopt | ||||
287 | shift | ||||
288 | shmctl | ||||
289 | shmget | ||||
290 | shmread | ||||
291 | shmwrite | ||||
292 | shutdown | ||||
293 | sin | ||||
294 | sleep | ||||
295 | socket | ||||
296 | socketpair | ||||
297 | sort | ||||
298 | splice | ||||
299 | split | ||||
300 | sprintf | ||||
301 | sqrt | ||||
302 | srand | ||||
303 | stat | ||||
304 | state | ||||
305 | study | ||||
306 | substr | ||||
307 | symlink | ||||
308 | syscall | ||||
309 | sysopen | ||||
310 | sysread | ||||
311 | sysseek | ||||
312 | system | ||||
313 | syswrite | ||||
314 | tell | ||||
315 | telldir | ||||
316 | tie | ||||
317 | tied | ||||
318 | time | ||||
319 | times | ||||
320 | truncate | ||||
321 | uc | ||||
322 | ucfirst | ||||
323 | umask | ||||
324 | undef | ||||
325 | unlink | ||||
326 | unimport | ||||
327 | unpack | ||||
328 | unshift | ||||
329 | untie | ||||
330 | use | ||||
331 | utime | ||||
332 | values | ||||
333 | vec | ||||
334 | wait | ||||
335 | waitpid | ||||
336 | wantarray | ||||
337 | warn | ||||
338 | write | ||||
339 | |||||
340 | -r -w -x -o | ||||
341 | -R -W -X -O -e -z -s | ||||
342 | -f -d -l -p -S -b -c -t | ||||
343 | -u -g -k | ||||
344 | -T -B | ||||
345 | -M -A -C | ||||
346 | ); | ||||
347 | |||||
348 | 2 | 54µs | 2 | 36µs | # spent 21µs (6+15) within B::Keywords::BEGIN@348 which was called:
# once (6µs+15µs) by Perl::Critic::Utils::BEGIN@22 at line 348 # spent 21µs making 1 call to B::Keywords::BEGIN@348
# spent 15µs making 1 call to vars::import |
349 | 1 | 6µs | @Barewords = qw( | ||
350 | __FILE__ | ||||
351 | __LINE__ | ||||
352 | __PACKAGE__ | ||||
353 | __DATA__ | ||||
354 | __END__ | ||||
355 | CORE | ||||
356 | EQ | ||||
357 | GE | ||||
358 | GT | ||||
359 | LE | ||||
360 | LT | ||||
361 | NE | ||||
362 | NULL | ||||
363 | and | ||||
364 | cmp | ||||
365 | continue | ||||
366 | default | ||||
367 | do | ||||
368 | else | ||||
369 | elsif | ||||
370 | eq | ||||
371 | err | ||||
372 | for | ||||
373 | foreach | ||||
374 | ge | ||||
375 | given | ||||
376 | gt | ||||
377 | if | ||||
378 | le | ||||
379 | lock | ||||
380 | lt | ||||
381 | m | ||||
382 | ne | ||||
383 | no | ||||
384 | or | ||||
385 | package | ||||
386 | q | ||||
387 | |||||
388 | qr | ||||
389 | qw | ||||
390 | qx | ||||
391 | s | ||||
392 | sub | ||||
393 | tr | ||||
394 | unless | ||||
395 | until | ||||
396 | when | ||||
397 | while | ||||
398 | x | ||||
399 | xor | ||||
400 | y | ||||
401 | ); | ||||
402 | |||||
403 | 2 | 34µs | 2 | 36µs | # spent 21µs (6+15) within B::Keywords::BEGIN@403 which was called:
# once (6µs+15µs) by Perl::Critic::Utils::BEGIN@22 at line 403 # spent 21µs making 1 call to B::Keywords::BEGIN@403
# spent 15µs making 1 call to vars::import |
404 | 1 | 9µs | @TieIOMethods = qw( | ||
405 | BINMODE CLEAR CLEARERR CLONE CLONE_SKIP CLOSE DELETE EOF | ||||
406 | ERROR EXISTS EXTEND FDOPEN FETCH FETCHSIZE FILENO FILL FIRSTKEY FLUSH | ||||
407 | GETC NEXTKEY OPEN POP POPPED PRINT PRINTF PUSH PUSHED READ READLINE | ||||
408 | SCALAR SEEK SETLINEBUF SHIFT SPLICE STORE STORESIZE SYSOPEN TELL | ||||
409 | TIEARRAY TIEHANDLE TIEHASH TIESCALAR UNREAD UNSHIFT UNTIE UTF8 WRITE | ||||
410 | ); | ||||
411 | |||||
412 | 2 | 25µs | 2 | 37µs | # spent 23µs (8+14) within B::Keywords::BEGIN@412 which was called:
# once (8µs+14µs) by Perl::Critic::Utils::BEGIN@22 at line 412 # spent 23µs making 1 call to B::Keywords::BEGIN@412
# spent 14µs making 1 call to vars::import |
413 | 1 | 700ns | @UNIVERSALMethods = qw( | ||
414 | can isa DOES VERSION | ||||
415 | ); | ||||
416 | |||||
417 | 2 | 33µs | 2 | 35µs | # spent 20µs (6+14) within B::Keywords::BEGIN@417 which was called:
# once (6µs+14µs) by Perl::Critic::Utils::BEGIN@22 at line 417 # spent 20µs making 1 call to B::Keywords::BEGIN@417
# spent 14µs making 1 call to vars::import |
418 | 1 | 2µs | @ExporterSymbols = qw( | ||
419 | @EXPORT @EXPORT_OK @EXPORT_FAIL | ||||
420 | @EXPORT_TAGS _push_tags _rebuild_cache as_heavy export export_fail | ||||
421 | export_fail_in export_ok_tags export_tags export_to_level heavy_export | ||||
422 | heavy_export_ok_tags heavy_export_tags heavy_export_to_level | ||||
423 | heavy_require_version require_version | ||||
424 | ); | ||||
425 | |||||
426 | 2 | 33µs | 2 | 35µs | # spent 20µs (6+15) within B::Keywords::BEGIN@426 which was called:
# once (6µs+15µs) by Perl::Critic::Utils::BEGIN@22 at line 426 # spent 20µs making 1 call to B::Keywords::BEGIN@426
# spent 15µs making 1 call to vars::import |
427 | 1 | 53µs | @Symbols = ( @Scalars, @Arrays, @Hashes, @Filehandles, @Functions ); | ||
428 | |||||
429 | # This quote is blatantly copied from ErrantStory.com, Michael Poe's | ||||
430 | # comic. | ||||
431 | 1 | 31µs | 1 | 3µs | # spent 3µs within B::Keywords::BEGIN@431 which was called:
# once (3µs+0s) by Perl::Critic::Utils::BEGIN@22 at line 431 # spent 3µs making 1 call to B::Keywords::BEGIN@431 |
432 | 1 | 55µs | "You know, when you stop and think about it, Cthulhu is a bit a Mary Sue isn't he?" | ||
433 | |||||
434 | __END__ |