Dear all members:
I have a question , I want to use mod_perl handler print file sent size.
Apache Config file httpd.conf
=========================================================
Alias /test/ "D:/test/"
<Location /test/>
SetHandler perl-script
PerlHandler My::Test
Options ExecCGI
</Location>
=========================================================
Perl Module My::Test
=========================================================
package My::Test;
sub hanlder {
my $r = shift;
open(FILE,$r->filename) || return 404;
$r->send_fd(FILE);
close(FILE);
print $r->bytes_sent;
}
1;
=========================================================
this code print content of request file, but $r->bytes_sent print 0 at
all times.
Please tell me why and how to get this size.
Thanks for your help!
Your firend,
wac