Hallo renee,Sorry das du meine Frage nicht verstanden hast.
Ich meine es einfach so.
Beispiel:
Datei 1 (Name: datei1.pl)
Inhalt:
#!/usr/bin/perluse strict;
use CGI::Carp qw(fatalsToBrowser);
sub html {
my $html = "Content-type: text/html\n\n";
my $kopf = "<html><head><title>Test Datei1</title></head><body>";
my $ende = "</body></html>";
return($html, $kopf, $ende)};
print html();
------------------------------------------------
Datei 2 (Name: datei2.pl)Inhalt:
#!/usr/bin/perluse strict;
use CGI::Carp qw(fatalsToBrowser);
my $Ergebnis = 1 + 2 * 3 + 4 * 5 + 6 * 7 + 8 * 9;
Ausgabe();
$Ergebnis = sqrt(144);
Ausgabe();
sub Ausgabe {
print "Das Ergebnis lautet: <b>$Ergebnis</b><br>\n";}
--------------------------------------------So jetzt möchte ich
1. beide Dateien (Datei1/Datei2) mit einander verbinden, und
2. den Sub von der Datei1.pl in der Datei2.pl ändern, z.b. den <title>-Bereich, also nach dem ich den sub html in die datei2 geholt habe,möchte ich einiges ändern und dann ausgeben.
Ich hoffe ich habe es diesmal einiger maßen verständlich erklärt.
Mfg
Datum: 24.08.2006-15:11
sub-Befehl aus einer anderen Datei holen und editieren
