in reply to WWW::Mechanize issue

my $input = $m->current_form()->find_input('file_name');
$input->headers( content_type => $content_type );

[download]

HTML::Form

In Section Seekers of Perl Wisdom