use LWP::Simple;: Problem (Perl/CGI)

[thread]54[/thread]

use LWP::Simple;: Problem

Leser: 1

pktm

2003-09-30 20:07

User since
2003-08-07
2921 Artikel
BenutzerIn

Bekomme einen Fehler beim Scriptaufruf:

Code: (dl )

use LWP::Simple;
my $lnr = '2689';
my $k1  = '52';
my $k2  = '48';
my $getURL = qq~http://www.schlachtplatz.de/cgi-bin/spiel/karte.pl?lnr=$lnr&k1=$k1&k2=$k2~;

# ---------------------------------------------------
# LOGIK
# ---------------------------------------------------

my $file = get( $getURL );
print "Content-type: text/html\n\n";
print $file;

Meldung: Prototype mismatch: sub main::head vs ($) at karte.cgi line 16
Was sol mir das sagen?
mfg pktm

http://www.intergastro-service.de (mein erstes CMS :) )

format_c

2003-09-30 20:36

User since
2003-08-04
1706 Artikel
HausmeisterIn

Kann ich nicht nachvollziehen. Nur mit Parameterübergaben an ein Script wirst du mit LWP::Simple nicht sehr weit kommen. Halte dich da lieber an LWP::UserAgent.

Code: (dl )

format_c@linux:~/perl_samples> perl
use strict;
use LWP::Simple;
my $lnr = '2689';
my $k1='52';
my $k2='48';
my $getURL=qq~http://www.schlachtplatz.de/cgi-bin/spiel/karte.pl?lnr=$lnr&k1=$k1&k2=$k2~;

# ---------------------------------------------------
# LOGIK
# ---------------------------------------------------

my $file = get( $getURL );
print "Content-type: text/html\n\n";
print $file;

Content-type: text/html

format_c@linux:~/perl_samples>