use Data::Dumper;
local $Data::Dumper::Useqq = 1;
my $command = "PROGRAMM.exe ...";
warn Dumper $command;
print TARGET "$command\n";