Re^2: Finding oldest file in directory


Perl: the Markov chain saw
	PerlMonks

Re^2: Finding oldest file in directory

by pg (Canon)

on Oct 18, 2004 at 18:38 UTC ( [id://400271]=note: print w/replies, xml )

Need Help??

in reply to •Re: Finding oldest file in directory
in thread Finding oldest file in directory

"it'd be faster to cache your stats for the sort"

Depends on what does "oldest" mean, and how files are created, modified and removed from the directory. The catched info might not be correct and useful. It probably just increases the complexity of the program, with 10+ files in the directory, most likely not worth it.

Comment on Re^2: Finding oldest file in directory

Replies are listed 'Best First'.
Re^3: Finding oldest file in directory by halley (Prior) on Oct 18, 2004 at 18:41 UTC
I think what Randal L. Schwartz was referring to, when he said "cache it for the sort," was to use a very common sort optimization technique called, not coincidentally, the Schwartzian Transform. `@sorted = map { $_->[0] } sort { $a->[1] <=> $b->[1] } map { [ $_, (-s $_) ] } @unsorted;` [download] -- `[ e d @ h a l l e y . c c ]`	[reply] [d/l]
Re^3: Finding oldest file in directory by Fletch (Bishop) on Oct 18, 2004 at 18:58 UTC
If the underlying files are changing quick enough that `-s` isn't going to return the same result you're probably already screwed (and I want to say that some `qsort` implementations might even core on you)).	[reply] [d/l]

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://400271]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others drinking their drinks and smoking their pipes about the Monastery: (4)

As of 2024-04-19 13:27 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found