Иван Бахчеев > Class-Easy-0.18 > Class::Easy::Timer

Download:
Class-Easy-0.18.tar.gz

Dependencies

Annotate this POD

Website

CPAN RT

New  1
Open  0
View/Report Bugs
Source  

NAME ^

Class::Easy::Timer - really easy timer

ABSTRACT ^

SYNOPSIS ^

SYNOPSIS

        use Class::Easy;
        
        # timer doesn't run without properly configured logger
        logger ('default')->appender (*STDERR);

        $t = timer ('sleep one second');

        sleep (1);

        my $interval = $t->lap ('one more second'); # $interval == 1

        warn "your system have bad timer: 1s = ${interval}s"
                if $interval < 1;

        sleep (1);

        $interval = $t->end; # $interval == 1

        warn "your system have bad timer: 1s = ${interval}s"
                if $interval < 1;

        $interval = $t->total; # $interval == 2

METHODS ^

new

create timer, start new lap and return timer object

lap

get lap duration and start a new lap

end

get duration for last lap

total

get duration between timer creation and end call

AUTHOR ^

Ivan Baktsheev, <apla at the-singlers.us>

BUGS ^

Please report any bugs or feature requests to my email address, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Class-Easy. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT ^

ACKNOWLEDGEMENTS ^

COPYRIGHT & LICENSE ^

Copyright 2008-2009 Ivan Baktsheev

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

syntax highlighting: