かしこまりました
Thank you Jan and Jack
I will try to implement that.
Regards
Yamada
On Tue, Jan 11, 2022 at 4:10 PM Jacques Deguest <j...@deguest.jp> wrote:
> Yamada-san,
>
> You would need to set up a perl response handler like:
> <Location /webdav>
> SetHandler modperl
> PerlSetupEnv On
> PerlResponseHandler +Your::WebDav::Module
> </Location>
>
> and in your module Your::WebDav::Module you would write something like:
>
> BEGIN
> {
> use strict;
> use warnings;
> use Apache2::RequestRec ();
> use Apache2::Log ();
> use Apache2::Const -compile => qw( DECLINED OK :http );
> use Apache2::RequestUtil ();
> use Apache2::SubRequest ();
> use APR::Request ();
> };
>
> sub handler : method
> {
> my $self = shift( @_ );
> # Do stuff to handle the request, accepting it, declining it, etc.
> }
>
> Kind regards,
> Jacques Deguest
> (incidentally Tokyo, Japan)
>
> On 2022/01/11 13:49, Yamadaえりな wrote:
>
> Hello list,
>
> We are using mod_dav with apache2.4 to manage files via webdav protocol.
> We want to limit file uploading based on the user's total storage.
> For instance, if a user has his storage size reached to the max limit, he
> can't upload files anymore.
> Do you have any suggestions on how I can implement this by modperl?
>
> Thanks in advance.
> Yamada
>
>
>
