#! perl
use
warnings;
use
strict;
use
IO::Handle;
require
Perl::Dist::WiX;
STDOUT->autoflush(1);
STDERR->autoflush(1);
my
$sb
= Perl::Dist::WiX->new(
image_dir
=>
'C:\WiXTest'
,
temp_dir
=>
'C:\tmp'
,
trace
=> 2,
force
=> 1,
app_id
=>
'WiXTest'
,
app_name
=>
'Perl-Dist-WiX Test Perl'
,
app_publisher
=>
'Curtis Jewell'
,
build_number
=> 10,
checkpoint_after
=> [ 8, 9, 10 ],
checkpoint_stop
=> 8,
msi
=> 1,
zip
=> 1,
perl_version
=> 5100,
);
$sb
->run();