NAME

Text::ProgressBar::ReverseBar

VERSION

version 0.1

SYNOPSIS

use Text::ProgressBar::ReverseBar;

my $prevbar = Text::ProgressBar->new(maxval => 300, widgets  => [Text::ProgressBar::Percentage->new(), Text::ProgressBar::ReverseBar->new()]);
$prevbar->start();
for my $i (1..300) {
    sleep 0.01;
    $prevbar->update($i+1);
}
$prevbar->finish;

DESCRIPTION

A progress bar which stretches to fill the line but from right to left. It inherits all attributes of 'Bar' and can extend them.

METHODS

BUILD

add additional works after object creation

AUTHOR

Farhad Fouladi, <farhad at cpan.org>

LICENSE AND COPYRIGHT

Copyright 2012 Farhad Fouladi.

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.