Schrift
Start · Board · Anwendungen/Programme/Skripte in Perl · Fragen zu Perl-Modulen
[thread]9937[/thread]

heute WWW::Mechanize :)

Leser: 3


<< |< 1 2 >| >> 13 Einträge, 2 Seiten
xeroxed_yeti
 2007-08-02 15:15
#97291 #97291
User since
2007-07-19
12 Artikel
BenutzerIn
[default_avatar]
Hi ich habe wieder ein Problem!

weiß wer was die Fehlermeldung:
Code: (dl )
500 Missing newline after chunk data: '     <ul>'


in dem Script:
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

#!/usr/bin/perl -w

use strict;
use warnings;
use WWW::Mechanize;

my $htmlInput = ">ENSP00000260327 [Homo sapiens]\nMKLRTRKASQQSSPIQTQRTARAKRKYSEVDDSLPSGGE\n>ENSPTRP00000011989 [Pan trogldoytes]\nMRLRTRKASQ\n";
my $mech = WWW::Mechanize->new();
$mech->get('http://www.ebi.ac.uk/Tools/clustalw2/index.html');
$mech->submit_form(
        form_name => 'form3',
        fields => {'sequence' => $htmlInput}            
);
my $content = $mech->response()->content;
print "$content\n";

verursacht?

Bzw. bekommt ihr auch diese Fehlermeldung angezeigt?
Faldaar
 2007-08-02 16:07
#97310 #97310
User since
2003-11-05
14 Artikel
BenutzerIn
[default_avatar]
Ich bekomme beim Ausführen der o.g. Zeilen eine Ausgabe. Die komplette Ausgabe kann ich nicht posten, da max. 2000 Zeichen erlaubt sind und die Ausgabe ca. 6000 Zeichen sind.

Gruß
Martin
Es ist schwieriger eine vorgefasste Meinung zu zertrümmern als ein Atom. (Albert Einstein)
xeroxed_yeti
 2007-08-02 16:21
#97316 #97316
User since
2007-07-19
12 Artikel
BenutzerIn
[default_avatar]
hmm das habe ich mir leider geacht.
was für ein betriebssystem nutzt du?

das script läuft bei mir weder auf SuSE10.1 noch WindowsXP. Auf beiden sind die aktuellsten *.pm installiert :(
xeroxed_yeti
 2007-08-02 16:27
#97317 #97317
User since
2007-07-19
12 Artikel
BenutzerIn
[default_avatar]
wenn ich meine libraries nach 'Missing newline after chunk data' durchsuchen lasse, bekomme ich als einzigste Datei /Net/HTTP/Methods.pm als Ergebnis geliefert.

Hat jmd etwas von einem Bug in diesem Modul gehört?

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

grep -n4 -r 'Missing newline after chunk data' .
./site_perl/5.8.8/Net/HTTP/Methods.pm-429-
./site_perl/5.8.8/Net/HTTP/Methods.pm-430-      if ($chunked <= 0) {
./site_perl/5.8.8/Net/HTTP/Methods.pm-431-          my $line = my_readline($self);
./site_perl/5.8.8/Net/HTTP/Methods.pm-432-          if ($chunked == 0) {
./site_perl/5.8.8/Net/HTTP/Methods.pm:433:              die "Missing newline after chunk data: '$line'"
./site_perl/5.8.8/Net/HTTP/Methods.pm-434-                  if !defined($line) || $line ne "";
./site_perl/5.8.8/Net/HTTP/Methods.pm-435-              $line = my_readline($self);
./site_perl/5.8.8/Net/HTTP/Methods.pm-436-          }
./site_perl/5.8.8/Net/HTTP/Methods.pm-437-          die "EOF when chunk header expected" unless defined($line);
--
./vendor_perl/5.8.8/Net/HTTP/Methods.pm-429-
./vendor_perl/5.8.8/Net/HTTP/Methods.pm-430-    if ($chunked <= 0) {
./vendor_perl/5.8.8/Net/HTTP/Methods.pm-431-        my $line = my_readline($self);
./vendor_perl/5.8.8/Net/HTTP/Methods.pm-432-        if ($chunked == 0) {
./vendor_perl/5.8.8/Net/HTTP/Methods.pm:433:            die "Missing newline after chunk data: '$line'"
./vendor_perl/5.8.8/Net/HTTP/Methods.pm-434-                if !defined($line) || $line ne "";
./vendor_perl/5.8.8/Net/HTTP/Methods.pm-435-            $line = my_readline($self);
./vendor_perl/5.8.8/Net/HTTP/Methods.pm-436-        }
./vendor_perl/5.8.8/Net/HTTP/Methods.pm-437-        die "EOF when chunk header expected" unless defined($line);
ptk
 2007-08-02 23:20
#97358 #97358
User since
2003-11-28
3645 Artikel
ModeratorIn
[default_avatar]
Welche libwww-perl-Version benutzt du?
xeroxed_yeti
 2007-08-03 10:54
#97380 #97380
User since
2007-07-19
12 Artikel
BenutzerIn
[default_avatar]
ich benutze die libwww-perl-5.807, gedownloaded unter http://search.cpan.org/dist/libwww-perl/
Gast Gast
 2007-08-03 11:28
#97383 #97383
Falls sonst nichts hilft würde ich an Deiner Stelle probieren dem Request ein HTML/1.0 mitzugeben. Ich weiß aber nicht wo/wie man das bei libwww macht. (Chunked gibts erst ab HTML/1.1.)
MisterL
 2007-08-03 11:28
#97384 #97384
User since
2006-07-05
334 Artikel
BenutzerIn
[default_avatar]
Hier funktioniert es nach Installation von WWW::Mechanize und ActivePerl 5.8.8 :)
Output als Text: hier
Output als .html: hier

Gruss MisterL
“Perl is the only language that looks the same before and after RSA encryption.”
Gast Gast
 2007-08-03 11:29
#97386 #97386
Oh sorry vertippt, s/HTML/HTTP/g
xeroxed_yeti
 2007-08-03 13:27
#97395 #97395
User since
2007-07-19
12 Artikel
BenutzerIn
[default_avatar]
Hi und danke für eure Hilfe!

...das Problem ist gelöst. Es muss wohl an meiner Version von WWW::Mechanize unter SuSE gelegen haben. Sie wurde mit Hilfe von CPAN (default Einstellung) installiert, aber die scheint einen Bug bezüglich meines Problems zu haben.

Das Modul hatte ich zunächst ganz frech einfach in meine lib/ unter WindowsXP kopiert und deshalb bekam ich auch diese Fehlermeldung. Nachdem ich dieses Modul gelöscht hatte und mittels des Active State Perl Package Manager das Modul erneut installiert habe funzt alles wunderbar. Also bin ich hingegangen und habe die Module von WWW::Mechanize+Ordner zu Linux kopiert und tatsächlich klappt es nun auch dort.

...dummerweise habe ich vergessen eine diff laufen zu lassen und aus frust gleich den alten verbuggten WWW::Mechanize kram mit rm -r -f ins nirvana geschossen :D Kann euch also keinen unterschiede in beiden Versionen nennen ...hatte eben frust! =)


Nachtrag: ...leider liegt es wohl doch nicht an den Versionen.... komisch komisch, mal läuft es ohne probs, dann bekomme ich wieder diese Fehlermeldung! Da ich hinter einem Proxy bin werde ich wohl mal meine Jungs von dem Netzwerk fragen.

<< |< 1 2 >| >> 13 Einträge, 2 Seiten



View all threads created 2007-08-02 15:15.