find /rms -name 'COOL-event-log*' -exec <perl-script> {} ';'