Pfad eines Perlscriptes herausfinden

[Naberius]

Hi Forum,

folgendes Problem. Ich habe ein Script das ein anderes Script im selben Pfad aufruft. Das funktioniert aber zZ nur solange wie das erste script in seinem Unterverzeichnis aufgerufen wird. Um das ganze robuster zu machen will ich das zweite Script mit vollständigen Pfad aufrufen. Dazu habe ich mir geadacht ich nehme einfach den Pfad des ersten Scriptes da ja schließlich beide im selben Unterverzeichnis liegen. Jetzt die Frage wie bekomme ich den Pfad??? :confused:

Hoffe ich konnte mich verständlich ausdrücken

[alligator]

HI,

ich verstehe nicht ganz was du damit bezwecken willst, das 2 te Script absolut aufzurufen, aber du bekommst das aktuelle Verzeichnis so raus

my $x=`pwd`;

print $x;

geht aber nur auf Unix/linux.

Oder du benutzt das Modul Cwd mit der Funktion getcwd(), dass auch auf Windows gehen sollte ...

#bessere Lösung

use Cwd;

my $dir = getcwd;

print $dir;

cya

alligator

[Naberius]

Hi,

danke für deine Antwort nur mit pwd bekomme ich das aktuelle Verzeichnis und nicht das Verzeichnis in dem mein Script liegt.

[alligator]

Hi,

na dann hab ich dich falsch verstanden.

Dann versuch mal

print $0;

das sollte sein, was du suchst.