Thilo Modner: ALL-Objekt für Internetseiten

Beitrag lesen

Hallo cs!

Das Beispiel war _keines_ fuer JavaScript, sondern eines fuer die beliebte CGI-Sprache Perl. Und wenn Du etwas ordentliches haben willst kommst du auch nicht um CGI drumherum.

Aber Du willst die den Source angucken, ich ahbe mal ein kleines CGI-Script geschreiben, dass das viel besser kann.

#!/usr/local/bin/perl

use LWP::Simple;
use CGI qw(:standard);

unless (param()) {
  print header,
  start_html('Quelltext-Anzeige'),
  h1('Bitte Daten angeben'),
  start_form,
  p([ "URL:", textfield({-name => 'url' -size => 30}) ]),
  submit({-value => 'Absenden'}),
  end_form,
  end_html;
} else {
  print haeder,
  start_html('Quelltext-Anziege'),
  h1('Quelltext der Seite'),
  pre(getprint(param('url'))),
  end_html;
}

Einfach auf dem lokalen Webserver ablgen, fertig :)

Gruesse,
Thilo