#!/usr/bin/perl # sam / 20011102 use CGI; $cgi = new CGI; @data = $cgi->param; print $cgi->header; print $cgi->start_html("C4: No Server found"); #print $cgi->dump; if( defined($cgi->param("q"))) { $suchpat = $cgi->param("q"); } else { if( defined($cgi->param("MT"))) { $suchpat = $cgi->param("MT"); } else { $suchpat = "koeln.ccc.de" } }; print << "EOH";
8 | 713900 | 001825 | CHAOS | COMPUTER | CLUB | COLOGNE | ||||||||||||||||||||||||||||
|
||||||||||||||||||||||||||||||||||
c4 CCC |
EOH
print "Es wurde keine Seite (zu $suchpat) gefunden. "; print $cgi->a({-href=>("http://www.google.de/search?hl=de&safe=off&q=".$suchpat)},"Google: ".$suchpat), $cgi->br; print $cgi->a({-href=>("http://altavista.com/sites/search/web?q=".$suchpat."&pg=q&kl=XX&search=Search")},"Altavista: ".$suchpat), $cgi->br; print $cgi->a({-href=>("http://65.165.234.120/cgi-bin/robot?srch=".$suchpat)},"Astalavista: ".$suchpat), $cgi->br; print $cgi->a({-href=>("http://koeln.ccc.de/~drt/wiki.cgi?search=".$suchpat)},"C4Wiki: ".$suchpat), $cgi->br; print " "; print << "EOFOOT"; |
(K) CHAOS COMPUTER CLUB COLOGNE. All Rights reversed. | |||||||||
[ INCOMING LINKS | HOME ] |