| Filename | /home/ss5/perl5/perlbrew/perls/tapper-perl/lib/site_perl/5.16.3/Sys/Info/Constants.pm |
| Statements | Executed 56 statements in 662µs |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 1 | 1 | 1 | 14µs | 14µs | Sys::Info::Constants::BEGIN@10 |
| 1 | 1 | 1 | 13µs | 34µs | Sys::Info::Constants::BEGIN@44 |
| 1 | 1 | 1 | 11µs | 21µs | Sys::Info::Constants::BEGIN@2 |
| 1 | 1 | 1 | 9µs | 50µs | Sys::Info::Constants::BEGIN@24 |
| 1 | 1 | 1 | 8µs | 70µs | Sys::Info::Constants::BEGIN@6 |
| 1 | 1 | 1 | 7µs | 10µs | Sys::Info::Constants::BEGIN@3 |
| 1 | 1 | 1 | 7µs | 25µs | Sys::Info::Constants::BEGIN@5 |
| 1 | 1 | 1 | 7µs | 26µs | Sys::Info::Constants::BEGIN@42 |
| 1 | 1 | 1 | 7µs | 26µs | Sys::Info::Constants::BEGIN@39 |
| 1 | 1 | 1 | 6µs | 28µs | Sys::Info::Constants::BEGIN@27 |
| 1 | 1 | 1 | 6µs | 29µs | Sys::Info::Constants::BEGIN@25 |
| 1 | 1 | 1 | 6µs | 26µs | Sys::Info::Constants::BEGIN@35 |
| 1 | 1 | 1 | 6µs | 30µs | Sys::Info::Constants::BEGIN@36 |
| 1 | 1 | 1 | 6µs | 43µs | Sys::Info::Constants::BEGIN@4 |
| 1 | 1 | 1 | 6µs | 24µs | Sys::Info::Constants::BEGIN@40 |
| 1 | 1 | 1 | 6µs | 27µs | Sys::Info::Constants::BEGIN@30 |
| 1 | 1 | 1 | 6µs | 26µs | Sys::Info::Constants::BEGIN@41 |
| 1 | 1 | 1 | 6µs | 26µs | Sys::Info::Constants::BEGIN@46 |
| 1 | 1 | 1 | 6µs | 29µs | Sys::Info::Constants::BEGIN@32 |
| 1 | 1 | 1 | 6µs | 25µs | Sys::Info::Constants::BEGIN@34 |
| 1 | 1 | 1 | 6µs | 27µs | Sys::Info::Constants::BEGIN@26 |
| 1 | 1 | 1 | 6µs | 26µs | Sys::Info::Constants::BEGIN@29 |
| 1 | 1 | 1 | 5µs | 25µs | Sys::Info::Constants::BEGIN@37 |
| 1 | 1 | 1 | 5µs | 24µs | Sys::Info::Constants::BEGIN@48 |
| 1 | 1 | 1 | 2µs | 2µs | Sys::Info::Constants::CORE:qr (opcode) |
| 0 | 0 | 0 | 0s | 0s | Sys::Info::Constants::__ANON__[:20] |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | package Sys::Info::Constants; | ||||
| 2 | 2 | 20µs | 2 | 31µs | # spent 21µs (11+10) within Sys::Info::Constants::BEGIN@2 which was called:
# once (11µs+10µs) by Sys::Info::BEGIN@6 at line 2 # spent 21µs making 1 call to Sys::Info::Constants::BEGIN@2
# spent 10µs making 1 call to strict::import |
| 3 | 2 | 19µs | 2 | 13µs | # spent 10µs (7+3) within Sys::Info::Constants::BEGIN@3 which was called:
# once (7µs+3µs) by Sys::Info::BEGIN@6 at line 3 # spent 10µs making 1 call to Sys::Info::Constants::BEGIN@3
# spent 3µs making 1 call to warnings::import |
| 4 | 2 | 18µs | 2 | 79µs | # spent 43µs (6+37) within Sys::Info::Constants::BEGIN@4 which was called:
# once (6µs+37µs) by Sys::Info::BEGIN@6 at line 4 # spent 43µs making 1 call to Sys::Info::Constants::BEGIN@4
# spent 37µs making 1 call to vars::import |
| 5 | 2 | 18µs | 2 | 44µs | # spent 25µs (7+18) within Sys::Info::Constants::BEGIN@5 which was called:
# once (7µs+18µs) by Sys::Info::BEGIN@6 at line 5 # spent 25µs making 1 call to Sys::Info::Constants::BEGIN@5
# spent 18µs making 1 call to Exporter::import |
| 6 | 2 | 78µs | 2 | 132µs | # spent 70µs (8+62) within Sys::Info::Constants::BEGIN@6 which was called:
# once (8µs+62µs) by Sys::Info::BEGIN@6 at line 6 # spent 70µs making 1 call to Sys::Info::Constants::BEGIN@6
# spent 62µs making 1 call to base::import |
| 7 | |||||
| 8 | 1 | 400ns | $VERSION = '0.7804'; | ||
| 9 | |||||
| 10 | # spent 14µs within Sys::Info::Constants::BEGIN@10 which was called:
# once (14µs+0s) by Sys::Info::BEGIN@6 at line 22 | ||||
| 11 | 1 | 5µs | if ( ! defined &OSID ) { | ||
| 12 | 1 | 2µs | my %OS = ( | ||
| 13 | MSWin32 => 'Windows', | ||||
| 14 | MSWin64 => 'Windows', | ||||
| 15 | linux => 'Linux', | ||||
| 16 | darwin => 'OSX', | ||||
| 17 | ); | ||||
| 18 | 1 | 4µs | $OS{$_} = 'BSD' for qw( freebsd openbsd netbsd ); | ||
| 19 | 1 | 1µs | my $ID = $OS{ $^O } || 'Unknown'; | ||
| 20 | *OSID = sub () { "$ID" } | ||||
| 21 | 1 | 3µs | } | ||
| 22 | 1 | 14µs | 1 | 14µs | } # spent 14µs making 1 call to Sys::Info::Constants::BEGIN@10 |
| 23 | |||||
| 24 | 2 | 21µs | 2 | 91µs | # spent 50µs (9+41) within Sys::Info::Constants::BEGIN@24 which was called:
# once (9µs+41µs) by Sys::Info::BEGIN@6 at line 24 # spent 50µs making 1 call to Sys::Info::Constants::BEGIN@24
# spent 41µs making 1 call to constant::import |
| 25 | 2 | 18µs | 2 | 52µs | # spent 29µs (6+23) within Sys::Info::Constants::BEGIN@25 which was called:
# once (6µs+23µs) by Sys::Info::BEGIN@6 at line 25 # spent 29µs making 1 call to Sys::Info::Constants::BEGIN@25
# spent 23µs making 1 call to constant::import |
| 26 | 2 | 23µs | 2 | 49µs | # spent 27µs (6+22) within Sys::Info::Constants::BEGIN@26 which was called:
# once (6µs+22µs) by Sys::Info::BEGIN@6 at line 26 # spent 27µs making 1 call to Sys::Info::Constants::BEGIN@26
# spent 22µs making 1 call to constant::import |
| 27 | 2 | 20µs | 2 | 50µs | # spent 28µs (6+22) within Sys::Info::Constants::BEGIN@27 which was called:
# once (6µs+22µs) by Sys::Info::BEGIN@6 at line 27 # spent 28µs making 1 call to Sys::Info::Constants::BEGIN@27
# spent 22µs making 1 call to constant::import |
| 28 | |||||
| 29 | 2 | 31µs | 2 | 48µs | # spent 26µs (6+21) within Sys::Info::Constants::BEGIN@29 which was called:
# once (6µs+21µs) by Sys::Info::BEGIN@6 at line 29 # spent 26µs making 1 call to Sys::Info::Constants::BEGIN@29
# spent 21µs making 1 call to constant::import |
| 30 | 1 | 4µs | 1 | 22µs | # spent 27µs (6+22) within Sys::Info::Constants::BEGIN@30 which was called:
# once (6µs+22µs) by Sys::Info::BEGIN@6 at line 31 # spent 22µs making 1 call to constant::import |
| 31 | 1 | 18µs | 1 | 27µs | . q{DESCRIPTION/System/CentralProcessor}; # spent 27µs making 1 call to Sys::Info::Constants::BEGIN@30 |
| 32 | 1 | 4µs | 1 | 24µs | # spent 29µs (6+24) within Sys::Info::Constants::BEGIN@32 which was called:
# once (6µs+24µs) by Sys::Info::BEGIN@6 at line 33 # spent 24µs making 1 call to constant::import |
| 33 | 1 | 16µs | 1 | 29µs | . q{Windows NT/CurrentVersion//DigitalProductId}; # spent 29µs making 1 call to Sys::Info::Constants::BEGIN@32 |
| 34 | 2 | 21µs | 2 | 45µs | # spent 25µs (6+20) within Sys::Info::Constants::BEGIN@34 which was called:
# once (6µs+20µs) by Sys::Info::BEGIN@6 at line 34 # spent 25µs making 1 call to Sys::Info::Constants::BEGIN@34
# spent 20µs making 1 call to constant::import |
| 35 | 2 | 23µs | 2 | 46µs | # spent 26µs (6+20) within Sys::Info::Constants::BEGIN@35 which was called:
# once (6µs+20µs) by Sys::Info::BEGIN@6 at line 35 # spent 26µs making 1 call to Sys::Info::Constants::BEGIN@35
# spent 20µs making 1 call to constant::import |
| 36 | 2 | 20µs | 2 | 54µs | # spent 30µs (6+24) within Sys::Info::Constants::BEGIN@36 which was called:
# once (6µs+24µs) by Sys::Info::BEGIN@6 at line 36 # spent 30µs making 1 call to Sys::Info::Constants::BEGIN@36
# spent 24µs making 1 call to constant::import |
| 37 | 2 | 25µs | 2 | 45µs | # spent 25µs (5+20) within Sys::Info::Constants::BEGIN@37 which was called:
# once (5µs+20µs) by Sys::Info::BEGIN@6 at line 37 # spent 25µs making 1 call to Sys::Info::Constants::BEGIN@37
# spent 20µs making 1 call to constant::import |
| 38 | |||||
| 39 | 2 | 22µs | 2 | 45µs | # spent 26µs (7+19) within Sys::Info::Constants::BEGIN@39 which was called:
# once (7µs+19µs) by Sys::Info::BEGIN@6 at line 39 # spent 26µs making 1 call to Sys::Info::Constants::BEGIN@39
# spent 19µs making 1 call to constant::import |
| 40 | 2 | 19µs | 2 | 42µs | # spent 24µs (6+18) within Sys::Info::Constants::BEGIN@40 which was called:
# once (6µs+18µs) by Sys::Info::BEGIN@6 at line 40 # spent 24µs making 1 call to Sys::Info::Constants::BEGIN@40
# spent 18µs making 1 call to constant::import |
| 41 | 2 | 21µs | 2 | 46µs | # spent 26µs (6+20) within Sys::Info::Constants::BEGIN@41 which was called:
# once (6µs+20µs) by Sys::Info::BEGIN@6 at line 41 # spent 26µs making 1 call to Sys::Info::Constants::BEGIN@41
# spent 20µs making 1 call to constant::import |
| 42 | 2 | 28µs | 2 | 46µs | # spent 26µs (7+20) within Sys::Info::Constants::BEGIN@42 which was called:
# once (7µs+20µs) by Sys::Info::BEGIN@6 at line 42 # spent 26µs making 1 call to Sys::Info::Constants::BEGIN@42
# spent 20µs making 1 call to constant::import |
| 43 | |||||
| 44 | 2 | 32µs | 3 | 56µs | # spent 34µs (13+21) within Sys::Info::Constants::BEGIN@44 which was called:
# once (13µs+21µs) by Sys::Info::BEGIN@6 at line 44 # spent 34µs making 1 call to Sys::Info::Constants::BEGIN@44
# spent 20µs making 1 call to constant::import
# spent 2µs making 1 call to Sys::Info::Constants::CORE:qr |
| 45 | |||||
| 46 | 2 | 18µs | 2 | 45µs | # spent 26µs (6+20) within Sys::Info::Constants::BEGIN@46 which was called:
# once (6µs+20µs) by Sys::Info::BEGIN@6 at line 46 # spent 26µs making 1 call to Sys::Info::Constants::BEGIN@46
# spent 20µs making 1 call to constant::import |
| 47 | |||||
| 48 | 2 | 77µs | 2 | 43µs | # spent 24µs (5+19) within Sys::Info::Constants::BEGIN@48 which was called:
# once (5µs+19µs) by Sys::Info::BEGIN@6 at line 48 # spent 24µs making 1 call to Sys::Info::Constants::BEGIN@48
# spent 19µs making 1 call to constant::import |
| 49 | |||||
| 50 | 1 | 6µs | %EXPORT_TAGS = ( | ||
| 51 | device_cpu => [qw/ | ||||
| 52 | DCPU_LOAD_LAST_01 | ||||
| 53 | DCPU_LOAD_LAST_05 | ||||
| 54 | DCPU_LOAD_LAST_10 | ||||
| 55 | DCPU_LOAD | ||||
| 56 | /], | ||||
| 57 | windows_reg => [qw/ | ||||
| 58 | WIN_REG_HW_KEY | ||||
| 59 | WIN_REG_CPU_KEY | ||||
| 60 | WIN_REG_CDKEY | ||||
| 61 | WIN_REG_OCDKEY | ||||
| 62 | /], | ||||
| 63 | windows_wmi => [qw/ | ||||
| 64 | WIN_WMI_DATE_TMPL | ||||
| 65 | /], | ||||
| 66 | windows_etc => [qw/ | ||||
| 67 | WIN_B24_DIGITS | ||||
| 68 | WIN_USER_INFO_LEVEL | ||||
| 69 | /], | ||||
| 70 | date => [qw/ | ||||
| 71 | DATE_WEEKDAYS | ||||
| 72 | DATE_MONTHS | ||||
| 73 | DATE_MKTIME_YDAY | ||||
| 74 | DATE_MKTIME_ISDST | ||||
| 75 | /], | ||||
| 76 | |||||
| 77 | unknown => [qw/ | ||||
| 78 | UN_RE_BUILD | ||||
| 79 | /], | ||||
| 80 | |||||
| 81 | general => [qw/ | ||||
| 82 | OSID | ||||
| 83 | NEW_PERL | ||||
| 84 | USER_REAL_NAME_FIELD | ||||
| 85 | /], | ||||
| 86 | ); | ||||
| 87 | |||||
| 88 | 1 | 6µs | @EXPORT_OK = map { @{ $_ } } values %EXPORT_TAGS; | ||
| 89 | 1 | 1µs | $EXPORT_TAGS{all} = \@EXPORT_OK; | ||
| 90 | |||||
| 91 | 1 | 6µs | 1; | ||
| 92 | |||||
| 93 | __END__ | ||||
# spent 2µs within Sys::Info::Constants::CORE:qr which was called:
# once (2µs+0s) by Sys::Info::Constants::BEGIN@44 at line 44 |