Aktuelles Verzeichnis auslesen - #51439 (Allgemeines zu Perl)

snarf

2003-08-15 17:13

User since
2003-08-14
77 Artikel
BenutzerIn
[default_avatar]

[quote=ronald,15.08.2003, 14:23]

Code: (dl )

1
2

Hi!
Kurze Frage, kurze Antwort: Wie lese ich mit readdir das aktuelle Verzeichnis aus, in dem das Script sich befindet?

Hi,

Kurze Frage:
was den nun?
das aktuelle Verzeichnis
oder das Verzeichnis, in dem sich das Script befindet?

Das aktuelle Verzeichnis ist '.'

Das Verzeichnis, in dem sich das Script befindet, musst du erst bestimmen:
$0 enthält Verzeichnis mit Skriptnamen. Also:

Code: (dl )

1
2

use File::Basename;
my $dir = dirname($0);

[/quote]
Kleiner Tipp: $0 ist auch für so manche Überraschung gut, wenn das Skript nämlich mit relativem Pfad aufgerufen wird, dann liefert $0 auch nur den relativen Pfad zurück !

Es empfiehlt sich also, $0 auf /^\// zu prüfen ... und dann gegebenenfalls mit Cwd (Modul Cwd, siehe dort) zu ergänzen!