2010-03-30T06:50:43 kami

Code (perl): (dl )

1
2
3

if(-f $source_path)
#...
my $rar = Archive::Rar->new(-archive => "../../..".qq("$source_path");

Weil er sonst immer noch die Unterverzeichnisse mit vor den Path dran hängt in denen das Skriptfile liegt. Wie kann ich das noch schöner machen?

Wie bitte? Willst du mich veräppeln? Erst prüfst du ob eine Datei an einem bestimmten Ort liegt und dann greifst du auf eine ganz zu?

Unix:
../../../das/ist/nur/ein test ist nicht gleich /das/ist/nur/ein test
Windows:
../../..c:\das\ist\nur\ein test ist nicht gleich c:\das\ist\nur\ein test
MacOS<10:
../../..device1::das:ist:nur:ein test ist nicht gleich device1::das:ist:nur:ein test
Benutze File::Spec um den Pfad zu manipulieren. Die Doku ist nun wirkilich nicht so schwer zu lesen:
perdoc File::Spec oder File::Spec
Last edited: 2010-03-30 15:07:01 +0200 (CEST)