Gibt es in Perl einen Include-Befehl?
René Maroufi
- perl
Hallo,
ich lerne gerade Perl und hatte bisher immer PHP benutzt. In PHP und in SSI gibt es Include Befehle um den Inhalt einer anderen Datei einfach einzubinden. Leider habe ich so etwas unter Perl bisher nicht gefunden. Gibt es das in Perl nicht?
Gruß und Danke im vorraus
René
Halihallo René
ich lerne gerade Perl und hatte bisher immer PHP benutzt. In PHP und in SSI gibt es Include Befehle um den Inhalt einer anderen Datei einfach einzubinden. Leider habe ich so etwas unter Perl bisher nicht gefunden. Gibt es das in Perl nicht?
require bzw. use
perldoc -f require
perldoc -f use
Viele Grüsse
Philipp
Hallo René!
ich lerne gerade Perl und hatte bisher immer PHP benutzt. In PHP und in SSI gibt es Include Befehle um den Inhalt einer anderen Datei einfach einzubinden. Leider habe ich so etwas unter Perl bisher nicht gefunden. Gibt es das in Perl nicht?
Nicht direkt. Aber du kannst dir eine kleine Funktion basteln:
sub include
{
my $file = shift;
open(FILE,"<$file") || die "Open $file: $!";
read(FILE, my $data, -s $file);
close(FILE);
return $data;
}
Die Funktion liest eine Textdatei ein und gibt ihren Inhalt zurück.
Viele Grüße
Patrick Canterino