| 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 | B::Keywords::BEGIN@5 |
| 1 | 1 | 1 | 8µs | 23µs | B::Keywords::BEGIN@412 |
| 1 | 1 | 1 | 7µs | 22µs | B::Keywords::BEGIN@123 |
| 1 | 1 | 1 | 6µs | 35µs | B::Keywords::BEGIN@10 |
| 1 | 1 | 1 | 6µs | 22µs | B::Keywords::BEGIN@16 |
| 1 | 1 | 1 | 6µs | 22µs | B::Keywords::BEGIN@90 |
| 1 | 1 | 1 | 6µs | 21µs | B::Keywords::BEGIN@112 |
| 1 | 1 | 1 | 6µs | 21µs | B::Keywords::BEGIN@348 |
| 1 | 1 | 1 | 6µs | 20µs | B::Keywords::BEGIN@417 |
| 1 | 1 | 1 | 6µs | 21µs | B::Keywords::BEGIN@100 |
| 1 | 1 | 1 | 6µs | 20µs | B::Keywords::BEGIN@426 |
| 1 | 1 | 1 | 6µs | 21µs | B::Keywords::BEGIN@403 |
| 1 | 1 | 1 | 6µs | 20µs | B::Keywords::BEGIN@19 |
| 1 | 1 | 1 | 3µs | 3µs | B::Keywords::BEGIN@431 |
| 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__ |