1
2
3

if ( substr($path, -1, 1) ne '/' ) {
     $path .= '/';
}

meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!