← Index
NYTProf Performance Profile   « line view »
For /Users/timbo/perl5/perlbrew/perls/perl-5.18.2/bin/perlcritic
  Run on Sat Mar 19 22:12:22 2016
Reported on Sat Mar 19 22:14:10 2016

Filename/Users/timbo/perl5/perlbrew/perls/perl-5.18.2/lib/site_perl/5.18.2/B/Keywords.pm
StatementsExecuted 43 statements in 832┬Ás
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
11113┬Ás25┬ÁsB::Keywords::::BEGIN@5B::Keywords::BEGIN@5
1118┬Ás23┬ÁsB::Keywords::::BEGIN@412B::Keywords::BEGIN@412
1117┬Ás22┬ÁsB::Keywords::::BEGIN@123B::Keywords::BEGIN@123
1116┬Ás35┬ÁsB::Keywords::::BEGIN@10B::Keywords::BEGIN@10
1116┬Ás22┬ÁsB::Keywords::::BEGIN@16B::Keywords::BEGIN@16
1116┬Ás22┬ÁsB::Keywords::::BEGIN@90B::Keywords::BEGIN@90
1116┬Ás21┬ÁsB::Keywords::::BEGIN@112B::Keywords::BEGIN@112
1116┬Ás21┬ÁsB::Keywords::::BEGIN@348B::Keywords::BEGIN@348
1116┬Ás20┬ÁsB::Keywords::::BEGIN@417B::Keywords::BEGIN@417
1116┬Ás21┬ÁsB::Keywords::::BEGIN@100B::Keywords::BEGIN@100
1116┬Ás20┬ÁsB::Keywords::::BEGIN@426B::Keywords::BEGIN@426
1116┬Ás21┬ÁsB::Keywords::::BEGIN@403B::Keywords::BEGIN@403
1116┬Ás20┬ÁsB::Keywords::::BEGIN@19B::Keywords::BEGIN@19
1113┬Ás3┬ÁsB::Keywords::::BEGIN@431B::Keywords::BEGIN@431
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1## no critic (PodSections,UseWarnings,Interpolation,EndWithOne,NoisyQuotes)
2
3package B::Keywords;
4
5232┬Ás236┬Á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
use strict;
# spent 25┬Ás making 1 call to B::Keywords::BEGIN@5 # spent 11┬Ás making 1 call to strict::import
6
71200nsrequire Exporter;
81900ns*import = *import = \&Exporter::import;
9
10243┬Ás264┬Á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
use vars qw( @EXPORT_OK %EXPORT_TAGS );
# spent 35┬Ás making 1 call to B::Keywords::BEGIN@10 # spent 29┬Ás making 1 call to vars::import
1112┬Ás@EXPORT_OK = qw( @Scalars @Arrays @Hashes @Filehandles @Symbols
12 @Functions @Barewords @TieIOMethods @UNIVERSALMethods
13 @ExporterSymbols );
1411┬Ás%EXPORT_TAGS = ( 'all' => \@EXPORT_OK );
15
16223┬Ás238┬Á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
use vars '$VERSION';
# spent 22┬Ás making 1 call to B::Keywords::BEGIN@16 # spent 16┬Ás making 1 call to vars::import
171300ns$VERSION = '1.13';
18
19295┬Ás235┬Á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
use vars '@Scalars';
# spent 20┬Ás making 1 call to B::Keywords::BEGIN@19 # spent 15┬Ás making 1 call to vars::import
20119┬Á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
90228┬Ás238┬Á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
use vars '@Arrays';
# spent 22┬Ás making 1 call to B::Keywords::BEGIN@90 # spent 16┬Ás making 1 call to vars::import
9111┬Ás@Arrays = qw(
92 @+ $LAST_MATCH_END
93 @- @LAST_MATCH_START
94 @ARGV
95 @F
96 @INC
97 @_ @ARG
98);
99
100242┬Ás236┬Á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
use vars '@Hashes';
# spent 21┬Ás making 1 call to B::Keywords::BEGIN@100 # spent 15┬Ás making 1 call to vars::import
10112┬Á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
112230┬Ás236┬Á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
use vars '@Filehandles';
# spent 21┬Ás making 1 call to B::Keywords::BEGIN@112 # spent 15┬Ás making 1 call to vars::import
11311┬Ás@Filehandles = qw(
114 *ARGV ARGV
115 *_ _
116 ARGVOUT
117 DATA
118 STDIN
119 STDOUT
120 STDERR
121);
122
1232142┬Ás237┬Á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
use vars '@Functions';
# spent 22┬Ás making 1 call to B::Keywords::BEGIN@123 # spent 15┬Ás making 1 call to vars::import
124133┬Á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 print
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
348254┬Ás236┬Á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
use vars '@Barewords';
# spent 21┬Ás making 1 call to B::Keywords::BEGIN@348 # spent 15┬Ás making 1 call to vars::import
34916┬Á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 qq
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
403234┬Ás236┬Á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
use vars '@TieIOMethods';
# spent 21┬Ás making 1 call to B::Keywords::BEGIN@403 # spent 15┬Ás making 1 call to vars::import
40419┬Á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
412225┬Ás237┬Á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
use vars '@UNIVERSALMethods';
# spent 23┬Ás making 1 call to B::Keywords::BEGIN@412 # spent 14┬Ás making 1 call to vars::import
4131700ns@UNIVERSALMethods = qw(
414 can isa DOES VERSION
415);
416
417233┬Ás235┬Á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
use vars '@ExporterSymbols';
# spent 20┬Ás making 1 call to B::Keywords::BEGIN@417 # spent 14┬Ás making 1 call to vars::import
41812┬Á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
426233┬Ás235┬Á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
use vars '@Symbols';
# spent 20┬Ás making 1 call to B::Keywords::BEGIN@426 # spent 15┬Ás making 1 call to vars::import
427153┬Ás@Symbols = ( @Scalars, @Arrays, @Hashes, @Filehandles, @Functions );
428
429# This quote is blatantly copied from ErrantStory.com, Michael Poe's
430# comic.
431131┬Ás13┬Á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
BEGIN { $^W = 0 }
# spent 3┬Ás making 1 call to B::Keywords::BEGIN@431
432155┬Ás"You know, when you stop and think about it, Cthulhu is a bit a Mary Sue isn't he?"
433
434__END__