deprecated/buildtools/emulatorlauncher/src/RunPerl.cpp
changeset 669 ac2dc5c059f3
parent 666 76dc8e3e7f2e
parent 668 fb8810d63524
child 670 46ea84d14897
--- a/deprecated/buildtools/emulatorlauncher/src/RunPerl.cpp	Thu Oct 28 11:19:23 2010 +0800
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,80 +0,0 @@
-// Copyright (c) 1999-2009 Nokia Corporation and/or its subsidiary(-ies).
-// All rights reserved.
-// This component and the accompanying materials are made available
-// under the terms of "Eclipse Public License v1.0"
-// which accompanies this distribution, and is available
-// at the URL "http://www.eclipse.org/legal/epl-v10.html".
-//
-// Initial Contributors:
-// Nokia Corporation - initial contribution.
-//
-// Contributors:
-//
-// Description:
-// RunPerl.cpp : Defines the entry point for the console application.
-// 
-//
-
-
-#include <stdlib.h>
-#include <string.h>
-
-void main(int argc, char* argv[])
-	{
-
-	char** args = new char*[argc+3];
-	int index = 0;
-
-	char* p = argv[0];
-	int pl = strlen(p);
-	if((pl >= 4) &&
-		(*(p+pl-4)=='.') && 
-		(*(p+pl-3)=='e' || *(p+pl-3)=='E') &&
-		(*(p+pl-2)=='x' || *(p+pl-2)=='X') &&
-		(*(p+pl-1)=='e' || *(p+pl-1)=='E'))
-		*(p+pl-4)='\0';
-	char* cmd = new char[strlen(p)+4];
-	strcpy(cmd,p);
-	strcat(cmd,".pl");
-
-	args[index++] = "perl";
-	args[index++] = "-S";
-	args[index++] = cmd;
-
-	for(int i=1; i<argc; i++)
-		{
-		args[index++] = argv[i];
-		}
-
-	args[index] = NULL;
-
-	int sz = 0;
-
-	for(i=0; args[i]; i++)
-		{
-		sz += strlen(args[i]) + 3;
-		}
-		
-	char *s = new char[sz];
-	strcpy(s,args[0]);
-	strcat(s," ");
-	strcat(s,args[1]);
-	strcat(s," ");
-	strcat(s,args[2]);
-
-	for(i=3; args[i]; i++)
-		{
-		strcat(s," \"");
-		strcat(s,args[i]);
-		strcat(s,"\"");
-		}
-
-	int r = system(s);
-
-	delete[] s;
-	delete[] args;
-	delete[] cmd;
-
-	exit (r);
-	}
-