Catalyst-Plugin-UploadProgress
view release on metacpan or search on metacpan
lib/Catalyst/Plugin/UploadProgress.pm view on Meta::CPAN
# the upload as usual.
sub upload : Local {
my ( $self, $c ) = @_;
my $upload = $c->request->uploads->{file};
$upload->copy_to( '/some/path/' . $upload->filename );
}
=head1 DESCRIPTION
This plugin is a simple, transparent method for displaying a
progress bar during file uploads.
=head1 DEMO
Please see the example/Upload directory in the distribution for a working
example Catalyst application with upload progress. Since Upload Progress
requires 2 concurrent connections (one for the upload and one for the
Ajax, you will need to use either script/upload_poe.pl (which requires
L<Catalyst::Engine::HTTP::POE> >= 0.02) or script/upload_server.pl -f.
The -f enables forking for each new request.
( run in 0.365 second using v1.01-cache-2.11-cpan-0a6323c29d9 )