Reading file version information with Win32::AdminMisc

bobs has asked for the wisdom of the Perl Monks concerning the following question:

I have written a script to compare the versions of .DLL files in a given set of directories. I am using the module Win32::AdminMisc to do this. However, my script does not locate the version for each .DLL file - it only works for some of them. For example, here is some output from my program:

Current file: d:/work/vms/commonfiles/System/OLEDB/msdaora.dll
Version for msdaora.dll in dir 1: 2.60.6526.0
Version for msdaora.dll in dir 2: 2.52.6019.0
Current file: d:/work/vms/commonfiles/System/OLEDB/msdaer.dll
Version for msdaer.dll in dir 1:
Version for msdaer.dll in dir 2:

The script does not find the version for MSDAER.DLL. When I locate this file in explorer and bring up its properties, it does have a version. Does anyone have any insight as to why the version is not showing up via my script? Thanks...

Comment on Reading file version information with Win32::AdminMisc

Replies are listed 'Best First'.
Re: Reading file version information with Win32::AdminMisc by talexb (Chancellor) on Dec 19, 2001 at 20:42 UTC
Hmm .. Information on the Win32::AdminMisc module (I haven't installed it .. yet) is at this location. I'm guessing that you are using the function GetFileInfo( $::ThisPage, \%Info ). Is this a support issue with roth.net or is it a Perl question? "Excellent. Release the hounds." -- Monty Burns.	[reply]