NAME

Proc::BackOff::Exponential

SYNOPSIS

Usage:

 use Proc::BackOff::Exponential;

 my $obj = Proc::BackOff::Exponential->new( { base => 2 , exponent=> 'count' } );
 # On N'th failure delay would be set to:
 # 1st failure  :  2^1 = 2
 # 2nd failure  :  2^2 = 4
 # 3rd failure  :  2^3 = 8
 # 4th failure  :  2^4 = 16

 # or

 my $obj = Proc::BackOff::Exponential->new( { base => 'count' , exponent=> 2 } );
 # On N'th failure delay would be set to:
 # 1st failure  :  1^2 = 1
 # 2nd failure  :  2^2 = 4
 # 3rd failure  :  3^2 = 9
 # 4th failure  :  4^2 = 16

See Proc::BackOff for further documentation.

Overloaded Methods

new()

Check for variables being set

Required: base Required: exponent

calculate_back_off()

Returns the new back off value.

Changes

 0.02   2007-08-12 -- Daniel Lo
        - Documentation fixes.  No code changes.

 0.01   2007-04-17 -- Daniel Lo
        - Initial Version

AUTHOR

Daniel Lo <daniel_lo@picturetrail.com>

LICENSE

Copyright (C) PictureTrail Inc. 1999-2007 Santa Clara, California, United States of America.

This code is released to the public for public use under Perl's Artisitic licence.

POD ERRORS

Hey! The above document had some coding errors, which are explained below:

Around line 102:: =cut found outside a pod block. Skipping to next block.