All,

I tried to follow an earlier suggestion
(http://perl.apache.org/docs/2.0/user/porting/compat.html#C_Apache__File_),
but failed to figure out what to do.

I have this:

use Apache::File;

And later this:

    my $fh=Apache::File->new($r->filename);

    unless($fh) {
        $log->warn("Cannot open request - skipping ... $!");
        return Apache::DECLINED;
    }

    # Slurp the file (hopefully it's not too big).
    my $dirty=do{local $/; <$fh>};

What modperl2 constructs should I use to establish that file handle and do
what I need to do with it? I don't want to repair the missing Apache::File,
but I want to learn the modperl2 way of doing what needs to be done here.


-- 
Report problems: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html
List etiquette: http://perl.apache.org/maillist/email-etiquette.html

Reply via email to