Re: [Arsperl-users] Performance problems

[Paizo <pai...@gm...>]

Thanks guys, that helps a lot :)

>I'd also like to know some more details about what's going wrong with
>ars_GetFieldTable. Maybe this is a bug in ARSperl and your informations
>could help me to fix it.


Don't remeber exaclty, sometimes ( rare )

(%fids =3D ars_GetFieldTable($ctrl, $schema)) ||
    die "ars_GetFieldTable: $ars_errstr";

fail and print out the classic ARERR code...i remember it was like "you
don't have permissions..." but i forgot the error code number :/


i have another ( stupid question, still new to perl :| ) , if inside the th=
e
loop:

# Getting Entries
foreach my $entry_id (sort keys %entries) {
    my %entry =3D ars_GetEntry($ctrl, $ARSschema, $entry_id, @field_ids);
    print datafile join("|", @entry{@field_ids} ) . "\n";
}


i want to convert some dates that are in seconds since 1970 to something
like dd/mm/yyyy hh.mm.ss
if i try to read $field_ids[3] and always get "3" instead of the real
content :/
what i miss?




2007/8/2, Clayton Scott <cla...@gm...>:
>
> Paizo wrote:
> > Hi Listeners,
> >
> > I have some performance problem executing a perl script working like
> below:
> >
> > [ code snipped ]
> > That's take up too 1 hour for finish while using the same qualification
> with
> > AR System User take less than 2 minuts....
> >
> > How can i speed up that code?
> >
> > Thanks,
>
>
> One way to get an excellent increase in speed is to fetch all of the
> fields for each entry at once instead of individually.
>
> You should work hard to reduce the number of ars_ calls required
> because they involve the slowest part of this set up: the network.
>
> I'll show you a modified version of your final loop that does this.
> But first put your field id fetching into a loop and your field ids
> into an array so that they are easier to add/remove fields and pass
> the field ids on to the ars_GetEntry call.
>
> # Getting Field Ids
> my @field_names =3D ('something1', ... ,'somthingn');
> my @field_ids;
>
> foreach my $field_name ( @field_names ){
>     my $field_id;
>     ($field_id =3D ars_GetFieldByName($ctrl, $ARSschema, $field_name) ||
> die "bla bla bla.\n";
>     push @field_ids, $field_id;
> }
>
> # Getting Entries
> foreach my $entry_id (sort keys %entries) {
>     my %entry =3D ars_GetEntry($ctrl, $ARSschema, $entry_id, @field_ids);
>     print datafile join("|", @entry{@field_ids} ) . "\n";
> }
>
> I hope this helps,
>
> --
>
> Clayton Scott
> cla...@gm...
>
> -------------------------------------------------------------------------
> This SF.net email is sponsored by: Splunk Inc.
> Still grepping through log files to find problems?  Stop.
> Now Search log events and configuration files using AJAX and a browser.
> Download your FREE copy of Splunk now >>  http://get.splunk.com/
> _______________________________________________
> Arsperl-users mailing list
> Ars...@ar...
> https://lists.sourceforge.net/lists/listinfo/arsperl-users
>



--=20
--------------------
A me cugin na volta xe nd=E0 dal geataro e el ga domand=E0 na coppetta trig=
usto
co i gusti seegheta, sarexe e schie co na fettina de poenta.
El geataro pena sentio che=E0 goduriosa scelta, el se ga messo subito el
pigiama de banane e el ghe ga messo in testa a corona de poegge medie e lo
ga fatto diventare Re dei Gelati Biricchini.
-----------------------
Confezione trigusto seegheta/sarexe/chie co pratico contenitore par e fete
de poenta, stile estat=E8 o quea dea ciocoeata
Altri gusti poe essere bigadini/kiwi/lasonil co socoi de vacca da tociare o
erbagatta/straciatella/calsina co coe de sorxe da tociare
------------
Rileggendo a firma diria che se poe puntare al mercato dei ghiaccioli col e=
l
gusto crema al diserbo e parafl=F9 ricoperta da una soffice crosta de pus c=
o
al posto del bacheto un termometro anale pratico pa misurarse a freve dopo
aver magn=E0 el geato (chi xe che no lo fa al giorno d'oggi?!?!). Garantite
scorese bitonali e solfeggi anali.