Re: [PERL] Optimeringsspørgsmål..

[Peter Makholm <sslug@sslug>]

Jesper Krogh <sslug@sslug> writes:

> Exclusive Times
> %Time ExclSec CumulS #Calls sec/call Csec/c  Name
>  31.3   0.090  0.179     16   0.0056 0.0112  Net::Jabber::BEGIN

Disse 16 kald er hver gang der er en BEGIN-block i
Net::Jabber-modulet. Hver gang man laver en 'use Module' laver man
implicit en BEGIN-blok.

Disse udføres under parsningen af programmet.

>  20.8   0.060  0.298      9   0.0066 0.0331  main::BEGIN

Det er hver gang du selv direkte loader et modul eller har en anden
BEGIN-blok.

Jeg vil *gætte* på at initialiseringskode i moduler du loader ryger
ind og tæller her.

> Det første forstår jeg ikke, men jeg er 100% overbevist om at det der tager tiden er at loade Net::Jabber  ( + hvad den bruger ) og DBI

Det ser rigtigt nok ud. Du kan prøve at sammenligne med:

$ perl -d:DProf -MNet::Jabber=Client -MDBI -e 1
$ dprofpp

og 

$ perl -d:DProf -MNet::Jabber=Client -e 1
$ dprofpp
 

-- 
 Peter Makholm     |     Sit back and watch the messages. This is actually
 sslug@sslug |     more important than one might think as there is a
 http://hacking.dk |      bug in GNU Mach whereby hitting a key during the
                   |               boot process causes the kernel to panic
                   |                        -- GNU Hurd Installation Guide