Lust aufn Hack:
my @files = map{ $_->[0] } sort{ $a->[1] <=> $b->[1] } map{ [$_, (stat($_))[9]] } <*.txt>;
(nach Randal Schwartz) SCNR ;)
Lust aufn Hack:
my @files = map{ $_->[0] } sort{ $a->[1] <=> $b->[1] } map{ [$_, (stat($_))[9]] } <*.txt>;
(nach Randal Schwartz) SCNR ;)