package Apache::EchoFile;

use strict;
use Apache::Constants qw(:common);
use Apache::File ();

sub handler {
    my $r = shift;
    my $fh = Apache::File->new($r->filename) or return FORBIDDEN;
    $r->send_fd($fh);
    close $fh;
    return OK;
}

1;
__END__