Filename | /usr/lib/perl/5.10/MIME/Base64.pm |
Statements | Executed 15 statements in 395µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 19µ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 | 39µs | 2 | 28µs | # spent 24µs (19+4) within MIME::Base64::BEGIN@3 which was called:
# once (19µ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 | 102µs | # spent 55µs (8+47) within MIME::Base64::BEGIN@4 which was called:
# once (8µs+47µs) by C4::Letters::BEGIN@23 at line 4 # spent 55µs making 1 call to MIME::Base64::BEGIN@4
# spent 47µs making 1 call to vars::import |
5 | |||||
6 | 1 | 800ns | require Exporter; | ||
7 | 1 | 8µs | @ISA = qw(Exporter); | ||
8 | 1 | 700ns | @EXPORT = qw(encode_base64 decode_base64); | ||
9 | |||||
10 | 1 | 500ns | $VERSION = '3.08'; | ||
11 | |||||
12 | 1 | 600ns | require XSLoader; | ||
13 | 1 | 256µ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__ |