Help for this page
find2perl SOMEDIR -mtime +5 -print
# hand waving prior to this # ... unlink $file if int($age) > 5; } closedir(DIR);