Sean Evans wrote:

But that doesn't ever set $upload to anything. So I'm wondering what I'm
doing wrong here. Any thoughts?

Something's funny. I just knocked together the following fast 'n' ugly test that returns the uploaded file as the content for AxKit to process (a really bad idea that no one should be influenced by w/out considering the security implications ;-) and it all seems to work fine...


----------->%--------------
package Provider::UploadTest;

use strict;
use vars qw(@ISA);
use AxKit;
use Apache::AxKit::Provider::File;
@ISA = ('Apache::AxKit::Provider::File');

sub get_strref {
    my $self = shift;
    AxKit::Debug(1, "GET STRREFF CALLED");
    my $apr = Apache::Request->instance( $self->apache_request );

   if (my $upload = $apr->upload) {
       my $out;
       my $fh = $upload->fh;
       local $/ = undef;
       $out = <$fh>;
       return \$out;
   }
   else {
       return \'<?xml version="1.0"?><no-upload/>';
   }
}

sub init {
   # no op
}

sub exists {
    return 1;
}

sub mtime {
    return 0;
}

sub process {
    return 1;
}

1;
----------->%--------------

Are you sure the uploading form uses the right enctype and all that?

-kip


--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]



Reply via email to