Suchabfrage m.H.v. Perl und mySQL

[Michael Schröpl]

Hi tiger,

elsif ($tsskennung && $eMail eq ''){
  $SQL = "SELECT * FROM $computer_names WHERE computernumber like '$nummer'";
  }
elsif ($nummer && $tsskennung eq ''){
  $SQL = "SELECT * FROM $computer_names WHERE respemail like '$eMail'";
  }

Mir erscheint Deine Parameterversorgung verbesserungsfähig.

Was ist, wenn _mehr_ als ein Wert nicht-leer ist? Damit wird Deine Logik nicht fertig ... und falls dieser Fall nicht auftreten kann, übergibst Du zu viele Informationen.

Daß LIKE erstens wildcards braucht (Deine Queries werden in der vorliegenden Form nichts finden) und zweitens furchtbar langsam sein kann (keine Indexzugriffe), weißt Du?

return @row = ($nummer, $tsskennung, $eMail);

Diese Zeile habe ich nicht verstanden.

Wenn ja, wie erreiche ich, dass mir meine Suchergebenisse als HTML-Code an den Browser gesendet werden?

Indem Du sie nach stdout ausgibst. Die Kommunikation übernimmt der Webserver, der Dein Programm über die CGI-Schnittstelle aufgerufen wurde.
(Vergiß nicht, einen korrekten HTTP-Header vor dem HTML-Code auszugeben ...)

Viele Grüße
      Michael