öhm.. des geht ..habs probiert ... Aber es gibt sicher noch viel simplere Lösungen, aber ich bin schon 31 Stunden wach, also muss das reichen. ..Sag hinterher nicht, das das net geht ...es geht!
So denn... ich geh erstam schlafen jetzt ... *zzZZZZ* ...bye bye
my $Datei = "/etc/shadow";
if (open(DATA,"<$Datei")) {
my @TEMP = <DATA>;
close(DATA);
# ...Mach was
# ...Mach noch was anderes
print "Datei vorhanden :)\n";
}
else {
print "Datei is net da :(\n";
}