in reply to Re^2: Using File::Findin thread Using File::Find
You're missing a backslash...
find(\&wantedTS, "$dir"); [download]