Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl
use strict;
...
my $verStrs = $pe->getVersionStrings();

print "$_: '$verStrs->{$_}'\n" for keys %$verStrs;

Select or download this

CompanyName = 'ActiveState'
FileDescription = 'Perl Command Line Interpreter'
...
OriginalFilename = 'perl.exe'
ProductName = 'ActivePerl'
ProductVersion = 'Build 1603 [296746]'