#or for $files( map{ unpack'x4a*',$_ } sort map{pack 'Na*',(stat "x:/$_")[9],$_} readdir(root) ){ print "$files\n"; } [download]
In reply to Re: File list by date by I0 in thread File list by date by rasmus