Hallo!
Im Modul
Term::Choose::Util habe ich die Funktion
choose_a_directory.
Mit dieser Funktion kann man durch den Verzeichnis-Baum wandern und ein Verzeichnis auswählen, welches (der Pfad) dann von der Funktion zurückgegeben wird.
Ausgangspunkt ist das Verzeichnis, das mit dem ersten Argument übergeben wird.
Nun habe ich bemerkt, dass die Funktion nicht mehr richtig funktioniert, wenn als Ausgangsverzeichnis ein relativer Pfad angegeben wird. Darum wird jetzt das übergebene Verzeichnis so bearbeitet:
use Cwd qw( realpath );
sub choose_a_directory {
my ( $dir ) = @_;
$dir = realpath $dir;
}
Damit werden auch
.. und
. aufgelöst. Außerdem werden auch symbolische Links aufgelöst.
Ist es in so einem Fall in Ordnung, wenn symbolische Links aufgelöst werden?