Re: Return newest file

[cchampion]

in reply to Return newest file

You can get the last file in one go.

$last= (sort { -M $b <=> -M $a } <*.log>)[-1];

If you have a very large number of files, you may consider using the Schwartzian Transform to minimize sorting time.

$last = (
    map { $_->[0] } 
    sort { $b->[1] <=> $a->[1] } 
    map { [ $_, -M $_ ] } 
    <*.log>
    )[-1]; 

Both versions are short enough to be used in a one-liner.

Update
Tested in Linux and Windows. Works fine.

[snax]

Why torture yourself to grab the last element when you can reverse the sort and grab the first? It strikes me as being semantically clearer as well:

$newest = (sort { -M $a <=> -M $b } <*.log>)[0];

Same story with the Schwartz trick.

Of course, TIMTOWTDI :)