Benutzte das Verzeichnis, in welchem sich das Script befindet
Anmerkung von mir: ... und nicht das Verzeichnis, in dem das Script ausgeführt wird (das mit findbin gefunden wird).
Physischer Speicherort und Ausführungsort des Scripts sind nämich nicht identisch.
Ähm, meinst du das so:
use Cwd;
use FindBin qw/$RealBin/;
print 'Current working directory: ', cwd(), "\n";
print 'Path to perl-script: ', $RealBin;
Rufe ich obiges Script von c:\test aus wie folgt auf:
perl c:\test\siech\dirtest.pl
Erhalte ich:
Current working directory: c:/test
Path to perl-script: c:/test/siech
Mehr ist mit Perl nicht möglich.
Siechfred
--
Ein Selbständiger ist jemand, der bereit ist, 16 Stunden am Tag zu arbeiten, nur um nicht 8 Stunden für einen Anderen arbeiten zu müssen.
Ein Selbständiger ist jemand, der bereit ist, 16 Stunden am Tag zu arbeiten, nur um nicht 8 Stunden für einen Anderen arbeiten zu müssen.