| Filename | /home/ocbnet/domain/ocbnet.ch/vhost/webmerge/htdocs/webmerge/scripts/modules/RTP/Webmerge/Process/JS.pm |
| Statements | Executed 15 statements in 1.81ms |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 1 | 1 | 1 | 85µs | 370µs | RTP::Webmerge::Process::JS::BEGIN@8 |
| 1 | 1 | 1 | 56µs | 90µs | RTP::Webmerge::Process::JS::BEGIN@10 |
| 1 | 1 | 1 | 55µs | 672µs | RTP::Webmerge::Process::JS::BEGIN@25 |
| 1 | 1 | 1 | 53µs | 53µs | RTP::Webmerge::Process::JS::BEGIN@18.29 |
| 1 | 1 | 1 | 53µs | 142µs | RTP::Webmerge::Process::JS::BEGIN@9 |
| 1 | 1 | 1 | 25µs | 25µs | RTP::Webmerge::Process::JS::BEGIN@21 |
| 1 | 1 | 1 | 24µs | 24µs | RTP::Webmerge::Process::JS::BEGIN@18 |
| 1 | 1 | 1 | 23µs | 23µs | RTP::Webmerge::Process::JS::BEGIN@15 |
| 0 | 0 | 0 | 0s | 0s | RTP::Webmerge::Process::JS::dejquery |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | ################################################################################################### | ||||
| 2 | # Copyright 2013 by Marcel Greter | ||||
| 3 | # This file is part of Webmerge (GPL3) | ||||
| 4 | ################################################################################################### | ||||
| 5 | package RTP::Webmerge::Process::JS; | ||||
| 6 | ################################################################################################### | ||||
| 7 | |||||
| 8 | 2 | 165µs | 2 | 656µs | # spent 370µs (85+286) within RTP::Webmerge::Process::JS::BEGIN@8 which was called:
# once (85µs+286µs) by main::BEGIN@42 at line 8 # spent 370µs making 1 call to RTP::Webmerge::Process::JS::BEGIN@8
# spent 286µs making 1 call to Exporter::import |
| 9 | 2 | 174µs | 2 | 231µs | # spent 142µs (53+89) within RTP::Webmerge::Process::JS::BEGIN@9 which was called:
# once (53µs+89µs) by main::BEGIN@42 at line 9 # spent 142µs making 1 call to RTP::Webmerge::Process::JS::BEGIN@9
# spent 89µs making 1 call to strict::import |
| 10 | 2 | 198µs | 2 | 123µs | # spent 90µs (56+33) within RTP::Webmerge::Process::JS::BEGIN@10 which was called:
# once (56µs+33µs) by main::BEGIN@42 at line 10 # spent 90µs making 1 call to RTP::Webmerge::Process::JS::BEGIN@10
# spent 33µs making 1 call to warnings::import |
| 11 | |||||
| 12 | ################################################################################################### | ||||
| 13 | |||||
| 14 | # define our version string | ||||
| 15 | 1 | 170µs | 1 | 23µs | # spent 23µs within RTP::Webmerge::Process::JS::BEGIN@15 which was called:
# once (23µs+0s) by main::BEGIN@42 at line 15 # spent 23µs making 1 call to RTP::Webmerge::Process::JS::BEGIN@15 |
| 16 | |||||
| 17 | # load exporter and inherit from it | ||||
| 18 | 3 | 367µs | 2 | 77µs | BEGIN { use Exporter qw(); our @ISA = qw(Exporter) } # spent 53µs making 1 call to RTP::Webmerge::Process::JS::BEGIN@18.29
# spent 24µs making 1 call to RTP::Webmerge::Process::JS::BEGIN@18 |
| 19 | |||||
| 20 | # define our functions to be exported | ||||
| 21 | 1 | 145µs | 1 | 25µs | # spent 25µs within RTP::Webmerge::Process::JS::BEGIN@21 which was called:
# once (25µs+0s) by main::BEGIN@42 at line 21 # spent 25µs making 1 call to RTP::Webmerge::Process::JS::BEGIN@21 |
| 22 | |||||
| 23 | ################################################################################################### | ||||
| 24 | |||||
| 25 | 2 | 563µs | 2 | 1.29ms | # spent 672µs (55+616) within RTP::Webmerge::Process::JS::BEGIN@25 which was called:
# once (55µs+616µs) by main::BEGIN@42 at line 25 # spent 672µs making 1 call to RTP::Webmerge::Process::JS::BEGIN@25
# spent 616µs making 1 call to Exporter::import |
| 26 | |||||
| 27 | ################################################################################################### | ||||
| 28 | |||||
| 29 | # replace jquery calls with simple dollar signs | ||||
| 30 | # this way we can have best code compatibility | ||||
| 31 | # and still use the dollar sign when possible | ||||
| 32 | sub dejquery | ||||
| 33 | { | ||||
| 34 | |||||
| 35 | # get input variables | ||||
| 36 | my ($data, $config) = @_; | ||||
| 37 | |||||
| 38 | # replace "jquery(" and "jquery." | ||||
| 39 | ${$data} =~ s/jQuery([\(\.])/\$$1/gm; | ||||
| 40 | |||||
| 41 | # return success | ||||
| 42 | return 1; | ||||
| 43 | |||||
| 44 | } | ||||
| 45 | # EO sub dejquery | ||||
| 46 | |||||
| 47 | ################################################################################################### | ||||
| 48 | |||||
| 49 | # register the processor function | ||||
| 50 | 1 | 12µs | $processors{'dejquery'} = \& dejquery; | ||
| 51 | |||||
| 52 | ################################################################################################### | ||||
| 53 | ################################################################################################### | ||||
| 54 | 1 | 16µs | 1; |