secureswitools/swisistools/test/tinterpretsisinteg/check.pl
changeset 60 245df5276b97
parent 0 ba25891c3a9e
child 81 42552535c1ac
equal deleted inserted replaced
53:ae54820ef82c 60:245df5276b97
     1 #
     1 #
     2 # Copyright (c) 2006-2009 Nokia Corporation and/or its subsidiary(-ies).
     2 # Copyright (c) 2006-2010 Nokia Corporation and/or its subsidiary(-ies).
     3 # All rights reserved.
     3 # All rights reserved.
     4 # This component and the accompanying materials are made available
     4 # This component and the accompanying materials are made available
     5 # under the terms of the License "Eclipse Public License v1.0"
     5 # under the terms of the License "Eclipse Public License v1.0"
     6 # which accompanies this distribution, and is available
     6 # which accompanies this distribution, and is available
     7 # at the URL "http://www.eclipse.org/legal/epl-v10.html".
     7 # at the URL "http://www.eclipse.org/legal/epl-v10.html".
   170 	{		
   170 	{		
   171 		# Rest flags
   171 		# Rest flags
   172 		$searchresult = 0;
   172 		$searchresult = 0;
   173 		$filenotexist = 0;
   173 		$filenotexist = 0;
   174 	
   174 	
   175 		$filename = trim($temp);
   175 		$filename = lc trim($temp);
   176 		if($filename eq "")
   176 		if($filename eq "")
   177 		{
   177 		{
   178 			# Blank line found - no file to check
   178 			# Blank line found - no file to check
   179 			$passflag = 1;
   179 			$passflag = 1;
   180 			return; 
   180 			return;