将数据从html文件写入perl中的网页

Question

我编写了一个perl脚本，我需要读取一个html文件并将其内容写入网页并单击一个保存按钮。我写了下面的剧本，请在我出错的地方纠正我。

    use LWP::UserAgent;
use HTTP::Request;
use HTTP::Response;
use HTTP::Headers;
use HTTP::Status qw(:constants :is status_message);

my $ua = LWP::UserAgent->new;
$request = $client->put('http://www.chethan.com/pages/editpage.action?pageId=123456');
$request->setBody(fopen('/home/xyz/con.html', 'r'));
$response = $request->send();