open( IN, $go_POIFileName ) or die( "$go_POIFileName: $!" );
	while( <IN> )
	{
		chomp;
		my @tmp = split( /;/ );
		$g_POIRead{ lc($tmp[0]) } = @tmp;
	}
	close( IN );