...
upload_file($cgi->param('file_data'));
...
my $fh = $query->upload( $filename );

##</code><code>##

my $fh = $query->upload( 'file_data' );