Opened by jan_Gast at 2012-11-26 14:38
User since
2009-09-13
7016 Artikel
BenutzerIn
2009-09-13
7016 Artikel
BenutzerIn
Interessanterweise erhalte ich mit diesem Code die gewünschten Suchergebnisse:
Also scheint Mech das Formular nicht vollständig auszufüllen. Müsstest du mal debugen. Oder du machts es mit GET wie in meinem Beispiel, vielleicht reicht dir das ja sogar schon.
Code (perl): (dl
)
1 2 3 4
my $url = 'https://www.insolvenzbekanntmachungen.de/cgi-bin/bl_suche.pl?Suchfunktion=uneingeschr&Absenden=Suche+starten&Bundesland=Nordrhein-Westfalen&Gericht=--+Alle+Insolvenzgerichte+--&Datum1=&Datum2=&Name=&Sitz=&Abteilungsnr=&Registerzeichen=--&Lfdnr=&Jahreszahl=--&Registerart=--+keine+Angabe+--&select_registergericht=&Registergericht=--+keine+Angabe+--&Registernummer=&Gegenstand=--+Alle+Bekanntmachungen+innerhalb+des+Verfahrens+--&matchesperpage=10&page=1&sortedby=Datum'; my $brs = WWW::Mechanize->new( stack_depth => 0); $brs->get($url); print $brs->content();
Also scheint Mech das Formular nicht vollständig auszufüllen. Müsstest du mal debugen. Oder du machts es mit GET wie in meinem Beispiel, vielleicht reicht dir das ja sogar schon.
10 print "Hallo"
20 goto 10
20 goto 10