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:
use File::Spec::Function qw/canonpath/;
use Cwd qw/realpath/;
Sowohl
File::Spec als auch
Cwd sind Kernmodule, die mit der Perldistribution ausgeliefert werden und nicht nachinstalliert werden müssen.
When C++ is your hammer, every problem looks like your thumb.