it is slower on win98 for many reasons with one of the largest being that fat32 is slow and does not get cached well when walking the dir tree. also use strict, hereto's and don't use & to call a sub (unles you have good reason) for example your wanted sub can look like this:
sub wanted
{
/TNSNAMES.ORA/i or return;
Details($File::Find::name);
}