Forum Webscript.Ru
Программирование => Perl => Тема начата: Yaroslav от 17 Мая 2004, 23:21:18
-
полазил-поискал,
полистал-почитал,
но не нашел :(
ближайший вариант вот такой, может кто то знает более приятный?
foreach $filename (sort { -M $a <=> -M $b } glob("*.txt")) {
open (WORDSLIST, "$filename");
...тут операция с самым свежим файлом.
last;
}
-
$last = (sort { -M $a <=> -M $b } glob("*.txt"))[0];
-
NeoNox
спасибо