So, I would like to ask another question:
Is it safe to pass function reference to the caller (mostly it's the method
instantized from a class) in mod_perl development env?
Or should I avoid using this style?
Thanks.
27;{}'
>
> A code reference would be: 'sub{}', so do '$obj->run( sub{ "hello world"}
> );' instead.
>
> Jacques
>
> On 2022/01/11 17:51, Yamadaえりな wrote:
>
> Good afternoon,
>
> Can you help check my problem with this?
>
&g
Good afternoon,
Can you help check my problem with this?
$ cat t1.pl
use strict;
package Myclass;
sub new {
my $self = shift;
bless {},$self;
}
sub run {
my $self = shift;
my $block = shift;
&{$block};
}
1;
package main;
my $obj = Myclass->new;
$obj->run( { "hello world"} );
$
; 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.
> }
>
> Ki
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 imp
