if (($Session->{'usrType'} eq 'Pro') and ($Session->{'usrSystem'}=~/SEF|VAL|SUM|SAR|MRT|ALB|MRE|VER|RML|AUS|ORG|MSX|BAR|LAS/);
		{
		$Response->Write("found a match");
		}