Help for this page
#!usr/bin/perl ... my $final = ($string =~/(.*?)\x00/); print "\$final - $final";
INT GetFileVersionTxt(STRING sFile, out STRING sVersion)