How to use Apache2::Upload

[Boysenberry Payne]

In the Apache2::Upload doc it gives the following example:

use Apache2::Upload;
$req = Apache2::Request->new($r);
$upload = $req->upload("foo");

If I'm using this inside of a mod_perl handler do I need to do
$req = Apache2::Request->new($r);
where $r is my request handle?
Or am I getting confused?

So would the following be correct?

sub handler {

my $r = shift;
my $req = Apache2::Request->new( $r );
my $upload = $req->upload( "foo" );
my $fh = $upload->fh;
}

In the above would $fh be appropriate to use with Net::FTP->put( $fh )?

Thanks,
Boysenberry

boysenberrys.com | habitatlife.com | selfgnosis.com