Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Re: What's wrong with my Perl process timer? [SOLVED]

by taint (Chaplain)
on Jun 07, 2013 at 22:20 UTC ( [id://1037771]=note: print w/replies, xml ) Need Help??


in reply to What's wrong with my Perl process timer?

Greetings, and apologies,
OK. I just figured out my own answer -- I overestimated the time it would take, see; use higher precision.
So changing the last line from:
printf('Page processed by Perl %s in %.02f seconds',$],$total_time);
to
printf('Page processed by Perl %s in %.6f seconds',$],$total_time);
Note the %.02f to %.6f
also worked with %.5f

Sorry for the noise

For the record, here it is without the other stuff
just the interesting/required parts:
#!/usr/bin/perl -Tw # at the top of your page(s) use Time::HiRes qw/gettimeofday tv_interval/; my $start_time = [gettimeofday]; # at the very bottom of your page(s) my $total_time = tv_interval($start_time); printf('Page processed by Perl %s in %.6f seconds',$],$total_time); # note: could also have used sprintf


--chris

#!/usr/bin/perl -Tw
use perl::always;
my $perl_version = "5.12.4";
print $perl_version;

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1037771]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others imbibing at the Monastery: (2)
As of 2025-11-12 04:41 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    What's your view on AI coding assistants?





    Results (68 votes). Check out past polls.

    Notices?
    hippoepoptai's answer Re: how do I set a cookie and redirect was blessed by hippo!
    erzuuliAnonymous Monks are no longer allowed to use Super Search, due to an excessive use of this resource by robots.