use Win32::IE::Mechanize;
my $ie = Win32::IE::Mechanize->new( visible => 1 );
my $url = 'http://blah/test.html';
$ie->get( $url );
$ie->form_name( 'upload' );
$ie->set_fields(
	'file1' => 'D:\test.pl',
	'file2' => 'D:\test.pl',
);