[quote=vayu,25.02.2005, 14:12]kann mir mal jemand den code erklären?[/quote]
Man muss das praktisch von unten nach oben lesen: Zuerst wird mit map{} jeder Dateiname durch ein anonymes Array ersetzt, das als erstes den besagten Substring und als zweites den urspruenglichen Dateinamen enthaelt. Dann wird mit sort{} die Liste dieser anonymen Arrays jeweils nach ihrer ersten Komponente sortiert. Und dann wird mit map{} wieder jedes dieser Arrays durch seine zweite Komponente ersetzt, also den urspruenglichen Dateinamen.

Sag bescheid, wenn das nicht verstaendlich war, aber vergewisser Dich, dass Du perldoc -f sort und perldoc -f map gelesen hast.