my @files = split /\n/, `ls -1t`; for (@files) { ... }