Simple Frage

[Peter Mairhofer]

Hallo,

Ich will damit erreichen, dass ich eine einfache Funktion WebPost habe, der ich als ersten Parameter die URL uebergebe, als zweiten Parameter den Hash mit den Formulardaten. Die HTML-Seite wird einfach als Skalar zurueckgegeben.

Das ganze Zeug mit dem POST, LWP::WebRequest und das ganze ist einfach in der Funktion.

Wie soll ich's sonst machen?

Danke ich habs schon :´-)

my %data = ( daten1 => 'asdaf', daten2 => 'Das ist der Testtext final' );

print &WebPost('https://www.server.com',
    %data,
    'www.server.com');

sub WebPost($;%;$;)
{
(...)
    my $url = shift;
    my $data = shift;
    my $referer = shift;
(...)
    $req = POST $url, $data;