my $ua = LWP::UserAgent->new;
	my $res = $ua->post('http://localhost:8012/',
		Content_Type => 'form_data',
		Content => [
			Filedata => [ 'Hello.txt', 'Hello.txt',
				Content_Type => 'text/plain',
			],
			submit => 'Submit',
		],
	);

	if ($res->is_success) {
  print $res->content;
} else {
  print $res->status_line, "\n";
}