CGI-ProgressBar
view release on metacpan or search on metacpan
lib/CGI/ProgressBar.pm view on Meta::CPAN
: "float:left;
width: ".($self->{progress_bar}->{block_wi})."px;"
)."
}
.pblib_block_off { border:1px solid white; background: white; }
.pblib_block_on { border:1px solid blue; background: navy; }
";
if ($self->{progress_bar}->{label}){
$CSS .=".pblib_number {
text-align: right;
border: 1px solid transparent;
}";
}
$self->{progress_bar}->{css} = $CSS;
}
=head1 BUGS, CAVEATS, TODO
=over 4
=item One bar per page
( run in 0.515 second using v1.01-cache-2.11-cpan-a1d94b6210f )