my @cmd = ('nmake', '/s', 'NODEBUG=1', 'ADDED_CFLAGS=/DCOST_EN_US /DPAYMENT_CREDIT_CARD');
my $cmd = join ' ', map quotemeta, @cmd;
open(my $fr_nmake, '-|', "$cmd 2>&1") or die;
print <$fr_nmake>;
close($fr_nmake);