view release on metacpan or  search on metacpan

Resumable.pm  view on Meta::CPAN

    my $r = shift ;

download ({}, '/home/httpd/html/old.zip', $r) ;
#download ({}, '/home/httpd/html/c.zip', $r) ;
}

#doit;

1;
__END__
# Below is stub documentation for your module. You better edit it!

=head1 NAME

Apache::File::Resumable - example of how to serve resumable files under modperl

=head1 SYNOPSIS

This code can be adapted to serve resumable downloads under mod_perl.

As it is setup now, you could put this file in some directory under your