http::request の使用に関しての問題ですが、perl のプログラム（リフェレンス）の問題に
なりますのでここで質問させてもらいます。
ttp://search.cpan.org/~gaas/libwww-perl-5.834/lib/HTTP/Request.pm
によりますと、
$r = HTTP::Request->new( $method, $uri, $header_ref, $content )
で三番目の引数が、reference to an HTTP::Headers object or a plain array
reference of key/value pairs.
とリフェレンスになっております。
Can't call method "clone" on unblessed reference at C:/Perl/lib/HTTP/Message.pm
line 32.
＊たしかに、message.pm 内では、$header = $header->clone;　
となっております。
my %header = ('User-Agent' => 'test_Agent','Content-Type' => 'application/x-www-form-urlencoded');
my $header_ref = \%header;
と三番目の引数をセットしています。
ttp://ftp.ics.uci.edu/pub/websoft/libwww-perl/archive/1999h1/0500.html
解決方法は、このあたりに書いてあるとおもうのですが、どのように三番目の引数をセットしてやればいいでしょうかアドバイス願います。