use File::Find::Rule;

unlink File::Find::Rule
    ->name('*.std*', 'ULOG.*')
    ->file
    ->mtime(">9")
    ->in(".");
[download]

Makeshifts last the longest.