shift(@ARGV);
}
my $patchlevel = $opt{INST_VER};
-$patchlevel = s|^[\\/]||;
+$patchlevel =~ s|^[\\/]||;
+$patchlevel =~ s|~VERSION~|$]|g;
$patchlevel ||= $];
$patchlevel = qq["$patchlevel"];
}
print H;
}
-print H "#include <win32.h>\n";
close(H);
close(SH);