#!perl -w

$ENV{TYPE}='c:\scotts test\type me';
$new_debug_log='c:\scotts test\type me.bat';
my $rc = system('cmd.exe', '/c', $ENV{TYPE}, $new_debug_log );