in reply to Problems Uploadng a file

Please add:

use warnings;
use strict;

[download]

In Section Seekers of Perl Wisdom