File::Basename gehts so
($file,$path) = fileparse $fullname;

damit kann man aus einem String der kompletten pfad hat, pfad extrahieren. kann ich das durchlaufen lassen bis zum ersten ergebnis, speicher und weiter ab dem 2. usw.?