Ich würde eher mit regulären Ausdrücken arbeiten – zum Abschneiden von (Back-)Slashes am Ende des Strings eignet sich beispielsweise:


Wahrscheinlich sparst Du Dir aber viel Arbeit, wenn Du einfach die passenden Module dafür verwendest – ich denke da insbesondere an:


Sowohl File::Spec als auch Cwd sind Kernmodule, die mit der Perldistribution ausgeliefert werden und nicht nachinstalliert werden müssen.