Xacobeo::Timer3pm

Usage

        use Xacobeo::Timer;
        
        # As a one time use
        my $timer = Xacobeo::Timer->start("Long operation");
        do_long_operation();
        $timer->elapsed(); # Displays the time elapsed
        
        # A simple stop watch (the destructor displays the time elapsed)
        my $TIMER = Xacobeo::Timer->new("Method calls");
        sub hotspot {
                $TIMER->start();
                # Very slow stuff here
                $TIMER->stop();
        }

Overview

This package provides a very simple timer. This timer is used for finding hot spots in the application.

The timer is quite simple it provides the method "start" that starts the timer and the method "stop" that stops the timer and accumulates the elapsed time. The method "show" can be used to print the time elapsed so far while the method "elapsed" returns the time elapsed so far.

When an instance of this class dies (because it was undefed or collected by the garbage collector) the builtin Perl desctrutor will automatically call the method "show". But if the method show or elapsed was called during the lifetime of the instance then the destructor will not invoke the method show.

Methods

The package defines the following methods:

Copyright and license

Copyright (C) 2008,2009 by Emmanuel Rodriguez.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.