File::Find::Name Sortierung

[agapanthus]

Moin Frank.

Stimmt da was mit meinen Ordnern/Dateien nicht ?
Kann ich File::Find::Name irgendwie zum 0 -> 9 einlesen zwingen ?

hilft Dir sort weiter?

use File::Find;
@ARGV = qw(.) unless @ARGV;
find sub { push (@flist, $File::Find::name) }, @ARGV;
foreach (sort(@flist)){
  print "$_\n";
}

Gruß Frank