BEGIN {
	if ($ENV{PAR_TEMP} && $ENV{TCL_Library} ne "$ENV{PAR_TEMP}/inc/lib/tcl8.6") {
		print "Starting a Tcl::Tk PAR-exe file\n";
		print "We need to set shell environment variables first \n";		
		$ENV{TCL_Library} = "$ENV{PAR_TEMP}/inc/lib/tcl8.6";
		# I don't know whether this is really necessary?		
		$ENV{TK_Library} = "$ENV{PAR_TEMP}/inc/lib/tcl8.6";
		system($0);
		exit();	
	}
}