Select Code to Download

use Data::Dumper qw( Dumper );
use Win32::Exe   qw( );
...
    local $Data::Dumper::Indent = 1;
    print(Dumper($version_info));
}

$VAR1 = {
  "FileDescription" => "Notepad",
...
  "OriginalFilename" => "NOTEPAD.EXE",
  "InternalName" => "Notepad"
};