I'm guessing a bit here; if I need to upload stuff I generally use LWP directly, but reading tru the docs for H:R:F i could not find an explanation for this:

$f->field("DataFile", [undef, "stock_level", $file]);
Is this correct? Should you not be something like:

$f->field("DataFile", $file);

If this isn't the problem you might figure out which line is causing the problem by commenting out a few...

HTH.

-- 
Joost       downtime n. The period during which a system
            is error-free and immune from user input.
[download]