($name, $building, $type, $server, $support) = split ":",$_;
	$pserv{$name} = $server;
	$bldcnt{$building}++;
	$buildinghash{$building}{$name} = $type;
	$slevel{$name} = $support;