Dicop::Client::wget -- a connector object for Dicop::Client using wget

	use Dicop::Client::wget;
	use Dicop::Client;

	my $ua = Dicop::Client::wget->new();
	my $client = Dicop::Client->new ( ua => $ua );
        $client->work();		# never returns

perl5.008001, wget

This module represents a connector object for the client and manages the actual connection between server and client. It uses the popular wget program to do the work.

Create a new object.

Set/get the user agent string.

	my $agent = $ua->agent();
	$ua->agent('UserAgent/1.0');

Given a server url and a parameter string, simulates a PUT request:

	$response = $ua->put('http://127.0.0.1:8888/',$params);

Given a server url and a parameter string, simulates a GET request:

	$response = $ua->get('http://127.0.0.1:8888/files/main');

	$msg = $ua->message();

If the connect failed, this method returns a human-readable error message.

Return the HTTP respone code from the server for the last post() or get().

Return true if the last request from the server did not result in an error.

	my $content = $ua->content();

Return the content of the last successfull post() or get() call.

None discovered yet.

(c) Bundesamt fuer Sicherheit in der Informationstechnik 1998-2006

DiCoP is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License version 2 as published by the Free Software Foundation.

See http://www.bsi.de/ for more information.