# 古いログ・ファイルから４つ削除する
unlink @f = (
map { $_->[0] }
sort { $b->[1] <=> $a->[1] }
map { [$_, -M] } <*.log>
) [0..3];
More than 5 years have passed since last update.
Register as a new user and use Qiita more conveniently
- You get articles that match your needs
- You can efficiently read back useful information
- You can use dark theme