#!/usr/bin/perl -w

use strict;
use Win32;
use Win32::Process;

# Create the process object.

Win32::Process::Create($Win32::Process::Create::ProcessObj,
     "C:\\perl\\bin\\Perl.exe",              # Where Perl is located.
     "perl c:\\yourdir\\yourTKscript.pl",    #
     0,                                      # Don't Inherit
     DETACHED_PROCESS,                       #
     ".") or                                 # current directory
     die print_error();			     # 
     sub print_error(){			     #
         return Win32::FormatMessage(Win32::GetLastError() );
         }

$Win32::Process::Create::ProcessObj -> Resume();