сортировка файлов

[Yaroslav]

как отсортировать файлы по дате их изменения?
и вообще где можно посмотреть какие флаги имеет функция sort?

[Yaroslav]

что б было понятно где отсортировать:

while (defined($filename = glob("*.txt"))) {  #типа тут наверное
open (WORDSLIST, "$filename");
@file=;
}

[Chs]

perldoc -f sort
perldoc -f stat

[mike]

perldoc -f sort

foreach(sort { -M $a <=> -M $b } glob("*.txt")) { ... }

[Yaroslav]

mike:
foreach(sort { -M $a <=> -M $b } glob("*.txt")) { ... }

нефурычит

[mike]

В каком смысле? Я проверял прежде чем запостить.

[Yaroslav]

mike:
В каком смысле? Я проверял прежде чем запостить.

в прямом, куда его надо вставлять в моем примере?
если вставить так:
foreach(sort { -M $a <=> -M $b } ($filename = glob("*.txt")))
то он находит только один файл, а не все

[mike]

Yaroslav:
если вставить так:

Нет, так вставлять не надо. В моем примере тело цикла foreach будет выполняться последовательно для каждого из имен файлов после сортировки. Т.е. тебе нужно сделать где-то так:

foreach $filename (sort { -M $a <=> -M $b } glob("*.txt"))
{
    #сюда вставляешь код обработки $filename
}

[Yaroslav]

mike:
foreach $filename (sort { -M $a <=> -M $b } glob("*.txt"))

ОГРОМНОЕ СПАСИБО!