C:\>perl -MFile::Glob=bsd_glob -E "say bsd_glob('C:/Program Files/Microsoft Office/*/WINWORD.exe')"
C:/Program Files/Microsoft Office/Office12/WINWORD.exe

C:\>