File | /wise/base/deliv/dev/lib/perl/WISE.pm | Statements Executed | 6 | Total Time | 0.006583 seconds |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine | |
---|---|---|---|---|---|---|
1 | 1 | 1 | 0.28609 | 0.36279 | WISE:: | import |
Line | Stmts. | Exclusive Time | Avg. | Code |
---|---|---|---|---|
1 | ||||
2 | ||||
3 | # set the version | |||
4 | 1 | 1.0e-6 | 1.0e-6 | $WISE::VERSION = '1.00'; |
5 | ||||
6 | # Main loader of standard PDL package | |||
7 | ||||
8 | # spent 363ms (286+76.7) within WISE::import which was called
# once (286ms+76.7ms) at line 1 of (eval 3)[/wise/base/static/lib/perl5/site_perl/5.10.0/WISE/Env.pm:72] at line 72 of /wise/base/static/lib/perl5/site_perl/5.10.0/WISE/Env.pm | |||
9 | ||||
10 | 3 | 6.3e-5 | 2.1e-5 | my $pkg = (caller())[0]; |
11 | 1 | 0.00651 | 0.00651 | eval <<"EOD"; # spent 354µs making 6 calls to Exporter::import, avg 59µs/call
# spent 30µs making 1 call to Exporter::Lite::import
# spent 21µs making 4 calls to import, avg 5µs/call |
12 | ||||
13 | package $pkg; | |||
14 | ||||
15 | # Load the fundamental packages | |||
16 | use WISE::Release; | |||
17 | use WISE::Time; | |||
18 | use WISE::Pars; | |||
19 | use WISE::Utils; | |||
20 | use WISE::IOUtils; | |||
21 | use WISE::IPACTbl; | |||
22 | use WISE::FITSIO; | |||
23 | #use WISE::FITSIO::PDL; | |||
24 | use WISE::Dumper; | |||
25 | use WISE::CoUtils; | |||
26 | use WISE::Release; | |||
27 | use WISE::Wrap; | |||
28 | ||||
29 | EOD | |||
30 | ||||
31 | die $@ if $@; | |||
32 | ||||
33 | } | |||
34 | ||||
35 | package WISE; | |||
36 | ||||
37 | # Exit with OK status | |||
38 | ||||
39 | 1 | 4.0e-6 | 4.0e-6 | 1; |
40 |