unlink $_ for grep { -f $_ and -M _ > 8 and m/\.std|^ULOG\./ } glob ( "$dir/*" );