sub Build
{
    my $vcvars32 = 'VCVARS32.BAT';
    system ($vcvars32);

    $command = join("", "msdev ", "$workspace", "\\", "$projectname ", "\/MAKE ", "\"$name ", "\- ", "$activeconfiguration\" ", "\/REBUILD \/OUT ", "$workspace\\", "$log_name ", "\/USEENV"); 

    $start = localtime time;
    
    print "\nProcessing build...";
    system "$command";
    print "Done\n";

    $finish = localtime time;
}