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 | BEGIN@10 | Sys::Info::Constants::
1 | 1 | 1 | 13µs | 34µs | BEGIN@44 | Sys::Info::Constants::
1 | 1 | 1 | 11µs | 21µs | BEGIN@2 | Sys::Info::Constants::
1 | 1 | 1 | 9µs | 50µs | BEGIN@24 | Sys::Info::Constants::
1 | 1 | 1 | 8µs | 70µs | BEGIN@6 | Sys::Info::Constants::
1 | 1 | 1 | 7µs | 10µs | BEGIN@3 | Sys::Info::Constants::
1 | 1 | 1 | 7µs | 25µs | BEGIN@5 | Sys::Info::Constants::
1 | 1 | 1 | 7µs | 26µs | BEGIN@42 | Sys::Info::Constants::
1 | 1 | 1 | 7µs | 26µs | BEGIN@39 | Sys::Info::Constants::
1 | 1 | 1 | 6µs | 28µs | BEGIN@27 | Sys::Info::Constants::
1 | 1 | 1 | 6µs | 29µs | BEGIN@25 | Sys::Info::Constants::
1 | 1 | 1 | 6µs | 26µs | BEGIN@35 | Sys::Info::Constants::
1 | 1 | 1 | 6µs | 30µs | BEGIN@36 | Sys::Info::Constants::
1 | 1 | 1 | 6µs | 43µs | BEGIN@4 | Sys::Info::Constants::
1 | 1 | 1 | 6µs | 24µs | BEGIN@40 | Sys::Info::Constants::
1 | 1 | 1 | 6µs | 27µs | BEGIN@30 | Sys::Info::Constants::
1 | 1 | 1 | 6µs | 26µs | BEGIN@41 | Sys::Info::Constants::
1 | 1 | 1 | 6µs | 26µs | BEGIN@46 | Sys::Info::Constants::
1 | 1 | 1 | 6µs | 29µs | BEGIN@32 | Sys::Info::Constants::
1 | 1 | 1 | 6µs | 25µs | BEGIN@34 | Sys::Info::Constants::
1 | 1 | 1 | 6µs | 27µs | BEGIN@26 | Sys::Info::Constants::
1 | 1 | 1 | 6µs | 26µs | BEGIN@29 | Sys::Info::Constants::
1 | 1 | 1 | 5µs | 25µs | BEGIN@37 | Sys::Info::Constants::
1 | 1 | 1 | 5µs | 24µs | BEGIN@48 | Sys::Info::Constants::
1 | 1 | 1 | 2µs | 2µs | CORE:qr (opcode) | Sys::Info::Constants::
0 | 0 | 0 | 0s | 0s | __ANON__[:20] | Sys::Info::Constants::
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 |