Link "zusammensetzen" mit Perl oder JavaScript

[Stefan Einspender]

Hallo Forum,

heute will ich mal etwas hier verlangen und nicht selbermachen. Als
altgedienten Forumsteilnehmer braucht ihr mich nicht belehren, viel-
leicht erbarmt sich ja jemand und tippt mir mal schnell ein paar
fertige Zeilen hin ;-)

Das Problem:
Bei ripe.net und auch bei nsi.com (Networksolutions) hängt die abge-
fragte Domain einfach hintendran, das Formular wird mit "get" über-
geben.
Die URL‚s sehen dann so aus:

http://nsi.com/cgi-bin/whois/whois?STRING=domain.xy
http://www.ripe.net/cgi-bin/whois?query=domain.xy

Wer kann mir in JavaScript oder Perl ein kleines Script schreiben,
dass lediglich erkennt, ob die Domain auf de, com, net oder org
endet, dann die Eingabe an die zutreffende URL dranhängt und diese
Seite (in neuem Fenster) aufruft.
Also ich gebe z.Bsp. teamone.de ein, das Script erkennt .de und ruft
in einem neuen Fenster automatisch diese URL auf:

http://www.ripe.net/cgi-bin/whois?query=teamone.de

Wäre wirklich riesig, wenn mal jemand von euch quick&dirty die paar
Zeilen tippen könnte, ich kann es gut gebrauchen und habe leider z.
Zeit keine Zeit :-

Viele Grüße aus Dresden,
Stefan Einspender

PS: Nein, ich bezahle nix dafür, aber vielleicht ist einer der Danke-
Sager jetzt an der Reihe ;-)

[Cheatah]

Hi,

http://nsi.com/cgi-bin/whois/whois?STRING=domain.xy
http://www.ripe.net/cgi-bin/whois?query=domain.xy

Wer kann mir in JavaScript oder Perl ein kleines Script schreiben,
dass lediglich erkennt, ob die Domain auf de, com, net oder org
endet, dann die Eingabe an die zutreffende URL dranhängt und diese
Seite (in neuem Fenster) aufruft.

#!/usr/bin/perl -w
use strict;
use CGI ':standard';
my %external = ('de'=>'http://www.ripe.net/cgi-bin/whois?query=',
   'com'=>'http://nsi.com/cgi-bin/whois/whois?STRING=');
my ($extension) = param('domain') =~ /.([^.]+)$/;
print redirect($external{$extension} . param('domain'));

Ungetestet; unvollständig im Hinblick auf die Domains - aber das Prinzip sollte klar sein ;-)

Aufruf per "script.pl?domain=teamone.de" o.ä.

Cheatah

[Hans-Peter]

Hallo Stefan,

wirklich quick und dirty (und nur weil Du gegen UBB <--kommdesign.de) ;-)) bist

(FORM ACTION="/cgi-bin/domainabfrage.pl" METHOD="POST")
(P)Domainname: (INPUT TYPE="TEXT" NAME="domain")(/P)(BR)
(P)(SELECT NAME="endung" SIZE="1")
(OPTION VALUE="de")de(/OPTION)
(OPTION VALUE="com")com(/OPTION)
(OPTION VALUE="net")net(/OPTION)
(OPTION VALUE="org")org(/OPTION)
(/SELECT)(/P)
(P)(INPUT TYPE="SUBMIT" NAME="Abfrage starten")(/P)(/FORM)

#!/usr/bin/perl

read(STDIN, $input, $ENV{'CONTENT_LENGTH'});
@pairs = split(/&/, $input);
    foreach $pair (@pairs)
{
($name, $value) = split(/=/, $pair);
$name =~ tr/+/ /;
$name =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
    $FORM{$name} = $value;
}

$domain = $FORM{'domain'};
$endung = $FORM{'endung'};

if ($endung eq "de")
{
print "Location: http://www.ripe.net/cgi-bin/whois?query=$domain.de\n\n";
}

else
{
print "Location: http://nsi.com/cgi-bin/whois/whois?STRING=$domain.$endung\n\n";
}
exit;

Gruesse
Hans-Peter

[Björn Höhrmann]

http://nsi.com/cgi-bin/whois/whois?STRING=domain.xy
http://www.ripe.net/cgi-bin/whois?query=domain.xy

Wer kann mir in JavaScript oder Perl ein kleines Script schreiben,
dass lediglich erkennt, ob die Domain auf de, com, net oder org
endet,

#!perl -w
use URI;
use strict;
my $uri = new URI('http://nsi.com/cgi-bin/whois/whois?STRING=domain.xy');
my %q = $uri->query_form;
print $1 if $q{'STRING'} =~ /([^.]+)$/;

[Stefan Einspender]

Hallo Cheatah, Hans-Peter & Björn,

herzlichen Dank für die Scripte, Cheatah war der Schnellste (wieder
einmal ;-), Hans-Peter‚s Script gefällt mir am besten und Björn hat
es irgendwie nicht so richtig gepeilt *g*

@Cheatah:
Natürlich funktioniert Dein ungetestetes Script wunderbar, nur finde
ich bei Hans-Peter den Scriptaufruf einfacher, da kann ich wunderbar
ein Frameset verwenden und im unteren Fenster das NSI- oder RIPE-Er-
gebnis anzeigen lassen.

@Hans-Peter:
Schön ist die Auswahl der Endung, weil ich so letztendlich die nicht
jedesmal mit eingeben muß, sind ja immerhin auch 3-4 Zeichen mehr ;-)

@Björn:
Du scheinst Dich ja sehr gut auszukennen, aber irgendwie finde ich
persönlich Deine Antworten oft "zu kurz angebunden" und nicht hilf-
reich. Ich habe Dein Script nicht getestet, kann mir aber selbst bei
meinem laienhaften Perl-Wissen schlecht vorstellen, dass damit eine
de-Domain abgefragt werden kann :-

OK, soviel dazu und jetzt schnell (selbst) weitergearbeitet.

Viele Grüße aus Dresden,
Stefan Einspender, dem der Dr.Web-Newsletter gestern (02.10.) fast
16-mal soviele Besucher gebracht hat wie z.Bsp. vorgestern (01.10.)
ohne Newsletter *freu*

[Björn Höhrmann]

herzlichen Dank für die Scripte, Cheatah war der Schnellste (wieder
einmal ;-), Hans-Peter‚s Script gefällt mir am besten und Björn hat
es irgendwie nicht so richtig gepeilt

Das Problem:
Bei ripe.net und auch bei nsi.com (Networksolutions) hängt die abge-
fragte Domain einfach hintendran, das Formular wird mit "get" über-
geben.
Die URL‚s sehen dann so aus:

http://nsi.com/cgi-bin/whois/whois?STRING=domain.xy
http://www.ripe.net/cgi-bin/whois?query=domain.xy

Wer kann mir in JavaScript oder Perl ein kleines Script schreiben,
dass lediglich erkennt, ob die Domain auf de, com, net oder org
endet,

Die Domain die da hinten dran gehängt ist, von einer anderen redest du nicht. Ich habe die gestellte Frage richtig beantwortet. Wenn du Probleme hast, Fragen zu formulieren, ist das nicht mein Problem.

f'up2p

[csx]

einmal ;-), Hans-Peter‚s Script gefällt mir am besten und Björn hat
es irgendwie nicht so richtig gepeilt

Die Domain die da hinten dran gehängt ist, von einer anderen redest du nicht. Ich habe die gestellte Frage richtig beantwortet. Wenn du Probleme hast, Fragen zu formulieren, ist das nicht mein Problem.

Ich bin ja neu in diesem Forum, und es ist ja auch halbwegs informativ, aber irgentwie seit ihr hier echt nett zueinander. Stefan hat mich ja schon einmal voellig grundlos angegiftet. Schade eigentlich, weil sonst ist das Forum ja nicht schlecht...

[Stefan Einspender]

Hallo!

Die Domain die da hinten dran gehängt ist, von einer anderen redest du nicht. Ich habe die gestellte Frage richtig beantwortet. Wenn du Probleme hast, Fragen zu formulieren, ist das nicht mein Problem.

Ich bin ja neu in diesem Forum, und es ist ja auch halbwegs informativ, aber irgentwie seit ihr hier echt nett zueinander. Stefan hat mich ja schon einmal voellig grundlos angegiftet. Schade eigentlich, weil sonst ist das Forum ja nicht schlecht...

Speziell bei den Antworten von Bjoern, welche _grundsätzlich_ _immer_
richtig sind, habe ich manchmal meine Probleme, gerade die Leute,
denen er antwortet, scheinen überdurchschnittlich oft ihre Fragen
falsch formulieren ;-)

Die Sache mit dem "Stefan hat mich angegiftet" habe ich auch mitbe-
kommen, hast Du ja noch in dem Thread gepostet, wenn Du möchtest ent-
schuldige ich mich hiermit für dieses "Anmachen", ich ging in diesem
Fall wirklich davon aus, dass ích mit meiner Antwort richtig liege.
Interland kenne ich nur aus Deinem Posting, ist höchstwahrscheinlich
eine Bildungslücke bei mir, allerdings denke ich, dass die Eintragung
als tech-c und zone-c eher die Ausnahme ist, aber es gibt sie.

MFG, Stefan

[csx]

Die Sache mit dem "Stefan hat mich angegiftet" habe ich auch mitbe-
kommen, hast Du ja noch in dem Thread gepostet, wenn Du möchtest ent-
schuldige ich mich hiermit für dieses "Anmachen", ich ging in diesem
Fall wirklich davon aus, dass ích mit meiner Antwort richtig liege.
Interland kenne ich nur aus Deinem Posting, ist höchstwahrscheinlich
eine Bildungslücke bei mir, allerdings denke ich, dass die Eintragung
als tech-c und zone-c eher die Ausnahme ist, aber es gibt sie.

Schon vergessen!
:o)

[Alex Kleinjung]

Moin Göttlicher,

Die Domain die da hinten dran gehängt ist, von einer anderen
redest du nicht. Ich habe die gestellte Frage richtig
beantwortet. Wenn du Probleme hast, Fragen zu formulieren, ist
das nicht mein Problem.

f'up2p

Stefans Kritik war sachlich, vor allem aber hinsichtlich Deines
Postingverhaltens (Stichwort: hingerotzte Antworten, oft genug auch
noch falsche!) vollkommen berechtigt. Ihn deswegen jetzt blöd anzu-
machen bestätigt ja nur diese Einschätzung.

Grüsse,
  Alexander

[image:http://www98.l8.xodox.com/promo/akonline.gif" alt="www.alexander-kleinjung.de" style="cursor:hand;" onMouseUp="window.open('http://www98.l8.xodox.com/promo/forum.htm','select','width=325,height=240');" onmouseover="window.status='http://www.alexander-kleinjung.de';return true;" onmouseout="window.status='';return tru

[Andrea]

Hi,

...und Björn hat
es irgendwie nicht so richtig gepeilt *g*

mußt Du jemanden verarschen nur weil er sich die Mühe macht Deine Frage zu beantworten?

außerdem:
Zitat:
...vielleicht erbarmt sich ja jemand und tippt mir mal schnell ein paar fertige Zeilen hin ;-)

mfG
andrea

[Stefan Einspender]

Hallo Andrea,

...und Björn hat
es irgendwie nicht so richtig gepeilt *g*

mußt Du jemanden verarschen nur weil er sich die Mühe macht Deine Frage zu beantworten?

sorry, wenn es wirklich so direkt rüberkam, aber es ist wirklich so,
dass mir bei Björn‚s Antworten öfter auffällt, dass sie fachlich gut
sind, aber sehr bzw. zu kurz. Ich erinnere mich an eine Frage hier
im Forum "Welche Programmiersprechen muß ein Webprogrammierer kennen",
da hat er mit "Eine" geantwortet, so etwas ist vielleicht richtig,
aber anfangen kann damit niemand etwas. Es gibt noch ähnliche Fälle,
aber wie gesagt, ich weiß, dass er es kann, schließlich hatte er
bereits vor Jahren eine wirklich gute Homepage und auch heute gefällt
mir seine Website sehr gut:
http://in.germany2000.com/bjoernsworld/ - leider gelöscht, war ganz
gut
http://www.bjoernsworld.de/

...vielleicht erbarmt sich ja jemand und tippt mir mal schnell ein paar fertige Zeilen hin ;-)

Ja, nur waren die Zeilen von Bjoern so für mich nicht zu gebrauchen,
auch wenn er in <113123.html> behauptet, es würde an meiner Art der
Fragestellung liegen.
Wenn ich grundsätzlich davon ausgehe, dass ich alles richtig beant-
worte, bleibt ja letztendlich nur diese Möglichkeit ;-)

Viele Grüße aus Dresden,
Stefan Einspender