Filename | /usr/lib/perl/5.10/MIME/Base64.pm |
Statements | Executed 15 statements in 382µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 20µs | 24µs | BEGIN@3 | MIME::Base64::
1 | 1 | 1 | 8µs | 55µs | BEGIN@4 | MIME::Base64::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | package MIME::Base64; | ||||
2 | |||||
3 | 3 | 34µs | 2 | 28µs | # spent 24µs (20+4) within MIME::Base64::BEGIN@3 which was called:
# once (20µs+4µs) by C4::Letters::BEGIN@23 at line 3 # spent 24µs making 1 call to MIME::Base64::BEGIN@3
# spent 4µs making 1 call to strict::import |
4 | 3 | 79µs | 2 | 103µs | # spent 55µs (8+48) within MIME::Base64::BEGIN@4 which was called:
# once (8µs+48µs) by C4::Letters::BEGIN@23 at line 4 # spent 55µs making 1 call to MIME::Base64::BEGIN@4
# spent 48µs making 1 call to vars::import |
5 | |||||
6 | 1 | 900ns | require Exporter; | ||
7 | 1 | 9µs | @ISA = qw(Exporter); | ||
8 | 1 | 700ns | @EXPORT = qw(encode_base64 decode_base64); | ||
9 | |||||
10 | 1 | 400ns | $VERSION = '3.08'; | ||
11 | |||||
12 | 1 | 700ns | require XSLoader; | ||
13 | 1 | 247µs | 1 | 240µs | XSLoader::load('MIME::Base64', $VERSION); # spent 240µs making 1 call to XSLoader::load |
14 | |||||
15 | 1 | 2µs | *encode = \&encode_base64; | ||
16 | 1 | 500ns | *decode = \&decode_base64; | ||
17 | |||||
18 | 1 | 8µs | 1; | ||
19 | |||||
20 | __END__ |