CPU use by Perl

Allo!

>Gilles> My hosting provider have recently installed a
monitor gizmo to
>Gilles> shut down Perl script to hungry. This gizmo
shut down before the end
>Gilles> of the script and this cause some
inconvenience to me and to the
>Gilles> site users, cause, the sites need this script
to update.
>
>Gilles> I run this script for a long time whitout
problem, I try to limit the
>Gilles> execution timeout under 5-6 second.
>
>Gilles> As my provider don't want to lower the gizmo
sensibility, I want to
>Gilles> know how I can know how much ressource is use
by the script.
>
>If you just want wall-clock time, user and system CPU
time, and user
>and system CPU time used by your kids:
>
>my times;
>BEGIN { times = (time, times); }
>END {
>   times = map { $_ - shift times } (time, times);
>   warn sprintf "clock: %d user: %.2g sys: %.2g
cuser: %.2g csys: 
> %.2g", times;
>}
>#user = user cpu time
>#sys = sys cpu time
>#cuser/csys = same thing for all children

I put the following in my script and I don't see any
result.

Could you explain more?

Appreciate

Gilles B.




Unsubscribing info is here: h
ttp://help.yahoo.com/help/us/groups/groups-32.html 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://g
roups.yahoo.com/group/perl-beginner/

<*> Your email settings:
    Individual Email | Traditional

<*> To change settings online go to:
    http
://groups.yahoo.com/group/perl-beginner/join
    (Yahoo! ID required)

<*> To change settings via email:
    mailto:perl-beginner-digest@yahoogroups.com 
    mailto:perl-beginner-fullfeatured@yahoogroups.com

<*> To unsubscribe from this group, send an email to:
    perl-beginner-unsubscribe@yahoogroups.com

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.c
om/info/terms/
 

>>>>> "Gilles" == Gilles Beauregard
<gillesbalour.org> writes:

>> my times;
>> BEGIN { times = (time, times); }
>> END {
>> times = map { $_ - shift times } (time, times);
>> warn sprintf "clock: %d user: %.2g sys: %.2g
cuser: %.2g csys: %.2g",
>> times;
>> }
>> #user = user cpu time
>> #sys = sys cpu time
>> #cuser/csys = same thing for all children

Gilles> I put the following in my script and I don't see
any result.

It'll write to STDERR.  You have to look for it.  If this is
a webserver,
that'll be in the error log.  Otherwise, it should be on the
screen, right
at the end.

-- 
Randal L. Schwartz - Stonehenge Consulting Services, Inc. -
+1 503 777 0095
<merlynstonehenge.com> <URL:http://www.ston
ehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy,
etc. etc.
See PerlTraining.Stonehenge.com for onsite and
open-enrollment Perl training!


Unsubscribing info is here: h
ttp://help.yahoo.com/help/us/groups/groups-32.html 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://g
roups.yahoo.com/group/perl-beginner/

<*> Your email settings:
    Individual Email | Traditional

<*> To change settings online go to:
    http
://groups.yahoo.com/group/perl-beginner/join
    (Yahoo! ID required)

<*> To change settings via email:
    mailto:perl-beginner-digest@yahoogroups.com 
    mailto:perl-beginner-fullfeatured@yahoogroups.com

<*> To unsubscribe from this group, send an email to:
    perl-beginner-unsubscribe@yahoogroups.com

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.c
om/info/terms/
 

>>>>> "Gilles" == Gilles Beauregard
<gillesbalour.org> writes:

Gilles> Allo!
Gilles> My hosting provider have recently installed a
monitor gizmo to
Gilles> shut down Perl script to hungry. This gizmo shut
down before the end
Gilles> of the script and this cause some inconvenience
to me and to the
Gilles> site users, cause, the sites need this script to
update.

Gilles> I run this script for a long time whitout
problem, I try to limit the
Gilles> execution timeout under 5-6 second.

Gilles> As my provider don't want to lower the gizmo
sensibility, I want to
Gilles> know how I can know how much ressource is use by
the script.

If you just want wall-clock time, user and system CPU time,
and user
and system CPU time used by your kids:

my times;
BEGIN { times = (time, times); }
END {
  times = map { $_ - shift times } (time, times);
  warn sprintf "clock: %d user: %.2g sys: %.2g cuser:
%.2g csys: %.2g", times;
}

user = user cpu time
sys = sys cpu time
cuser/csys = same thing for all children

-- 
Randal L. Schwartz - Stonehenge Consulting Services, Inc. -
+1 503 777 0095
<merlynstonehenge.com> <URL:http://www.ston
ehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy,
etc. etc.
See PerlTraining.Stonehenge.com for onsite and
open-enrollment Perl training!


Unsubscribing info is here: h
ttp://help.yahoo.com/help/us/groups/groups-32.html 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://g
roups.yahoo.com/group/perl-beginner/

<*> Your email settings:
    Individual Email | Traditional

<*> To change settings online go to:
    http
://groups.yahoo.com/group/perl-beginner/join
    (Yahoo! ID required)

<*> To change settings via email:
    mailto:perl-beginner-digest@yahoogroups.com 
    mailto:perl-beginner-fullfeatured@yahoogroups.com

<*> To unsubscribe from this group, send an email to:
    perl-beginner-unsubscribe@yahoogroups.com

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.c
om/info/terms/