Abfrage und Auswertung von einer Webseite (Perl/CGI)

[thread]10511[/thread]

Abfrage und Auswertung von einer Webseite

Leser: 1

heidieswi

2007-10-04 18:29

User since
2007-10-04
9 Artikel
BenutzerIn
[default_avatar]

Hallo zusammen,

bin neu hier (auch in der Perl-Prog.) heiße Heinz-Dieter und bin auch in der Läuferszene unterwegs.

Dort liegt auch der Ursprung meines Problems.

Auf der Webseite unseres Vereins haben wir die Möglichkeit der Onlineameldung für unseren Marathon. www.bienwald-marathon.de
Die Meldedaten werden mit einem perl-skript überprüft. Die ChipNr kann von mir jedoch nur über die Seite: www.chipcheck-mikatiming.de überprüft werden. Diese Seite gibt 4 Zeilen Text zurück, der je nach "/?chip=XYZ234C" andere Inhalte über die Qualität der übergebenen Nr. enthält.

Ich habe nun überhaupt keine Idee wie ich diese Überprüfung in mein Skript einbaue.

Danke mal vorab.

H.-D.

renee

2007-10-04 18:32

User since
2003-08-04
14371 Artikel
ModeratorIn

Leider beschreibst Du nicht genau, wie Du die Überprüfung haben willst. Hier mal ein kleines Skript, was von der Webseite das Skript aufruft und die Antwort ausgibt...

Code (perl): (dl )

use LWP::Simple;

my $base_url = "http://www.chipcheck-mikatiming.de/?chip=";
my $chip = "XYZ234C";
my $content = get( $base_url . $chip );
print $content;

Für mehr brauchen wir mehr Infos...

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

heidieswi

2007-10-04 19:14

User since
2007-10-04
9 Artikel
BenutzerIn
[default_avatar]

Danke für die rasche Antwort.

Ich hab das Skript mal abgetippt, bekomme aber eine Fehlermeldung:

[root@mylinux cgi-bin]# ./htmltest.pl
syntax error at ./htmltest.pl line 7, near "my "
Execution of ./htmltest.pl aborted due to compilation errors.

Code (perl): (dl )

#!/usr/bin/perl -w

use LWP::Simple;

my $cUrl = 'http://chipcheck.mikatiming.de/?chip=';
my $chip = "XYZ123C"
my $content = get( $cUrl . $chip );
print $content;
# end of file

So sieht die Antwort auf der Web-Seite aus. Wenn ich die Info in $content habe, ist das Problem gelöst.

Valid: true
Chip: DW3Z3B5
Code: 0
Message: OK

Valid: false
Chip: XYZ123C
Code: 1
Message: 1. Zeichen fehlerhaft!

H.-D.

topeg

2007-10-04 19:40

User since
2006-07-10
2611 Artikel
BenutzerIn

user image

Zeile 6.
"my $chip = "XYZ123C""
muß lauten
"my $chip = "XYZ123C";".
Du hast das Semikolon am Ende vergessen.

heidieswi

2007-10-04 19:56

User since
2007-10-04
9 Artikel
BenutzerIn
[default_avatar]

topeg+2007-10-04 17:40:16--
Zeile 6.
"my $chip = "XYZ123C""
muß lauten
"my $chip = "XYZ123C";".
Du hast das Semikolon am Ende vergessen.

Aua, dass tut weh ;-) (wer lesen kann ist klar in Vorteil!)

Ja, Semikolon drin und schon funktioniert es!!

Freude, hüpf :-))

Danke

View all threads created 2007-10-04 18:29.