ASPN ActiveState Programmer Network
ActiveState
/ Home / Perl / PHP / Python / Tcl / XSLT /
/ Safari / My ASPN /
Cookbooks | Documentation | Mailing Lists | Modules | News Feeds | Products | User Groups


Recent Messages
List Archives
About the List
List Leaders
Subscription Options

View Subscriptions
Help

View by Topic
ActiveState
.NET Framework
Open Source
Perl
PHP
Python
Tcl
Web Services
XML & XSLT

View by Category
Database
General
SOAP
System Administration
Tools
User Interfaces
Web Programming
XML Programming


MyASPN >> Mail Archive >> perl-win32-users
perl-win32-users
RE: AdminMisc::GetFileInfo gives different info than Windows explorer
by Steven Manross other posts by this author
Sep 29 2004 6:31PM messages near this date
view in the new Beta List Site
Re: [Distutils] Add RPM-friendly Record Option | Re: AdminMisc::GetFileInfo gives different info than Windows explorer
I'm guessing here, but I think you are looking at the difference
between:

--->  FileVersion 

 - and -

--->  ProductVersion.

HTH

Steven

-----Original Message-----
From: perl-win32-users-bounces@[...].com
[mailto:perl-win32-users-bounces@[...].com] On Behalf Of
Ben Conrad
Sent: Wednesday, September 29, 2004 11:18 AM
To: perl-win32-users
Subject: AdminMisc::GetFileInfo gives different info than Windows
explorer


Folks,

I'm writing a script to find gdiplus.dll files that may be vulnerable to
the
microsoft GDI+ bug.

When I use:

Win32::AdminMisc::GetFileInfo($filename, \%Info);
print "- $Info{ProductVersion}\n";
-or-
print "- $Info{FileVersion}\n";

I get version 5.1.3102.2180

But if I look at the file properties in Windows Explorer or use
filever.exe
I get 5.1.3097.0

There are notes in the AdminMisc README that say something about a
subhash
with a keyname of "File", but I'm not sure how to implement that.

> >>
Added support for GetFileInfo() to return:
            - Hash will have a subhash with the keyname of "File":
                - File Version (true value as reported by the
FileVersion
stamp) 
                - Product Version (true value as reported by the
ProductVersion stamp)
> >>>


Thanks,

Ben
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@[...].com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@[...].com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Thread:
Steven Manross
Sisyphus

Privacy Policy | Email Opt-out | Feedback | Syndication
© ActiveState Software Inc. All rights reserved